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Woord vooraf 


Rechtvaardigheid! Eerlijkheidshalve moet ik zeggen dat dit boek een behoorlijke 
‘selfkick’ is geworden. Wat mij persoonlijk aan het werken met MSX-computers 
stoorde, is het gebrek aan ‘ter zake doende’ informatie en het ontbreken van goed 
werkende ontwikkelingsprogrammatuur. Zelf programmeer ik ALLEEN 
MAAR in machinetaal en dat op onder andere MSX, Commodore 64/128/ 
C16/ + 4, Atari ST en AMIGA. Voor de niet-MSX-machines is het allemaal wel 
in orde: voldoende informatie en goede programmeermogelijkheden. Met de 
MSX is het tot mijn spijt wat minder mooi gesteld! 


De informatie ontbreekt veelal of blinkt uit in nutteloze zwaarlijvigheid en wat de 
ontwikkelingsprogrammatuur betreft, is het ‘huilen met de pet af’! Over die 
informatie volsta ik met op te merken dat deze vaak uit de fabrieksopgave(n) is 
overgenomen. Daarom is het soms onmogelijk om snel iets terug te vinden. De 
ontwikkelingsprogrammatuur draait meestal onder MSX-DOS waardoor het 
weer moeilijk wordt om de BIOS-routines aan te spreken. Ook in alle andere 
gevallen (misschien een kleine uitzondering voor ZEN) wordt er veel te slordig 
omgesprongen met het toch al veel te kleine werkgeheugen van de MSX. 


Ik heb bovenal getracht een ‘anders dan anders’ boek te schrijven. De informatie 
is snel en sluit aan op het eigenlijke programmeren in machinetaal. Geen uitge- 
breide omschrijvingen dus, maar handige tabellen. 

Als programmeeromgeving heb ik speciaal voor dit boek een Z80-monitor ge- 
schreven. Het voordeel van zo’n machinetaalmonitor is de directe aanpak! De 
code wordt ter plekke aangemaakt waardoor het geheugen uiterst efficiënt kan 
worden gebruikt. Daarnaast vindt U nog een 25-tal extra mogelijkheden als 
disassemblering, geheugen-dumps, tekstinvoer, stelselconversie, logische bewer- 
kingen enz. 


Verder krijgt U een aantal treffende MSX-routines die U natuurlijk in uw eigen 
programma’s kunt toepassen. Daarnaast nog een behoorlijk aanzetje tot een 
karakter-editor en een sprite-editor. 


Kortom, efficiency voor alles. De dosis informatie is vrij stevig, maar de (uw) 
resultaten zijn dan ook navenant. Dat garandeer ik U! 


John ‘Drj’ Vanderaart 
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Inleiding 


Welkom nogmaals in dit ‘doe’-boek, waarde MSX-bezitter! 

U heeft dit boek waarschijnlijk ter hand genomen omdat U benieuwd bent naar al 
die verborgen MSX-capaciteiten. Een MSX-computer kan echt verschrikkelijk 
veel, maar niet in BASIC. Tenminste niet SNEL. BASIC, en dan met name het 
MSX-BASIC, is erg flexibel maar daarmee verliest het meteen een fors stuk 
snelheid. Toegegeven, in BASIC is ook alles mogelijk, maar dan wél op een laag 
pitje. Probeert U maar eens 32 sprites te laten bewegen, teksten af te drukken, 
geluid te produceren, een proces te controleren, en dat alles het liefst ook nog eens 
tegelijk! De enige oplossing is machinetaal. 


Machinetaal. Het klinkt vrij simpel, maar pas op! En zeker op een MSX-com- 
puter. Het eerste probleem wordt de ‘syntax’, want machinetaal is op het eerste 
gezicht niet te begrijpen. Dat klopt ook wel, aangezien de instructies in het begin 
wel erg op elkaar lijken. Het is een kwestie van gewenning en ervaring, dus zult U 
even door een zure appel heen moeten! 

Het tweede probleem is de programmadefinitie. In een hogere programmeertaal 
wordt overal voor gezorgd. Iets afdrukken stelt helemaal niets voor, laat staan de 
rekenkundige bewerkingen of de foutafhandeling. Het bijhouden van het variabe- 
lengeheugen ziet U bijvoorbeeld al helemaal niet! In machinetaal daarentegen 
moet U alles met de hand doen. Vaak wordt dat heel omslachtig, maar het 
voordeel is een stukje razendsnelle precisie. 

Een derde probleem is de kennis over de computer. Laten we uit uw aanschaf van 
dit boek concluderen dat U BASIC bent ontgroeid. De video-chip kent U 
natuurlijk al en ook de geluids-chip is inmiddels een open boek. Het is dan ook 
belachelijk om al die kennis nog eens voor te kauwen. In plaats daarvan vindt u 
een aantal tabellen met alle informatie die een machinetaal-programmeur zich 
maar kan wensen. 

Vierde en laatste probleem is het invoeren van de gewenste machinecode. Geen 
probleem aangezien U achterin dit boek een speciaal ontwikkelde machinetaal- 
monitor zult vinden. Het is even een aardig intypklusje, maar daartegenover staat 
een stuk ontwikkelings-software dat de prijs van dit boek meer dan rechtvaardigt! 


Bijkomend voordeel: U kunt alle listings uit dit boek meteen testen op hun 
deugdelijkheid. 


Wat gaan we doen? We gaan aan het werk! Zoals gezegd is dit een DOE-boek en 
het is niet de bedoeling dat U zich er met een ‘eitje’ vanaf kunt maken. Het wordt 
zweten, maar daarna weet U dan ook precies hoe U volledig zelfstandig draaiende 
machinetaal-programma’s kunt schrijven. Er wordt niets teveel beloofd, want U 
gaat zien hoe U(!) de video-chip nu ECHT kunt manipuleren, U zult leren hoe 
bestanden via de cassetterecorder worden geladen en opgeslagen. Ook gaat U 
werken met de printer, niet te vergeten de sprite-routines, wat spelmogelijkheden, 
tevens nog wat speciale effecten. Precies datgene wat nodig is voor een aantrek- 
kelijk en supersnel programma! 


De frustratiedrempel 


Voordat we gaan beginnen, moeten we iets afspreken: U klimt niet in de lamp! 
Wat hiermee wordt bedoeld? 

Programmeren in machinetaal is iets dat een grote dosis zelfbeheersing vereist. De 
kleinste beredeneringsfout en de MSX slaat op ‘TILT’, met de hoofdletter T dus. 
Waar U in BASIC nog altijd een CTRL/STOP-combinatie heeft, kunt U het in 
machinetaal wel vergeten. In 99 van de 100 gevallen is de RESET-knop de enige 
uitweg en kunt U weer opnieuw beginnen. Maar ja, dan had U tenslotte maar niet 
aan machinetaal moeten beginnen! 


Tegenover de voortdurende frustratie staat een zinderende kick als uw routines 
WEL werken. U (en ook uw omgeving!) zult werkelijk onder de indruk raken van 
de fabelachtige snelheid waarmee machinetaal de zaken regelt. Waar U in BASIC 
de zoveelste bak koffie wegslurpt, komt U om van de machinetaaldorst… 


En in geen geval gaat de MSX het raam uit, want dat hebben we daarnet al 
afgesproken! 


1 Z80 Machinetaal 


1.1 Werken met een microprocessor 


In iedere computer bevindt zich een microprocessor. Een microprocessor is in 
feite het ‘kloppende hart’ van de computer. Via deze processor worden alle 
zichtbare en onzichtbare computerfuncties aangestuurd, zoals het toetsenbord, 
het beeldscherm, het interne geheugen enz. In uw MSX-computer zit een Z80, een 
zeer krachtige en werkelijk razendsnelle 8-bits microprocessor. 

Zo’n Z80-processor dient op een zeer speciale manier te worden aangesproken, in 
een speciaal taaltje: het bijna onbegrijpelijke ‘machinetaal’. Wat is machinetaal nu 
precies? 

Machinetaal is een op de microprocessor gerichte en daarom bovenal logisch 
opgebouwde, zeer directe programmeertaal. De niet al te veeleisende gebruiker 
merkt al gauw dat machinetaal in feite maar tot vier dingen in staat is: 


l simpele berekeningen (optellen, aftrekken, vergelijken) 

2 dataverplaatsing (in elke mogelijke vorm) 

3 logische bewerkingen of operaties (bijvoorbeeld ‘AND’, ‘OR’ en “XOR') 
4 tests en sprongen 


Ondanks (misschien dankzij?) al deze schijnbare beperkingen is machinecode 
snel, zeer snel. De BASIC-interpreter bijvoorbeeld is in feite niets anders dan een 
programma dat geheel in machinetaal is geschreven. Deze BASIC-interpreter is 
tevens een voorbeeld van een programma dat in ROM (Read Only Memory — 
permanent beschreven geheugen, waaruit alleen kan worden gelezen) staat. Het 
voordeel van zo’n ROM-programma is de permanente aanwezigheid. Een nadeel 
is de onmogelijkheid om er veranderingen in aan te brengen. 

Naast ROM-geheugen bestaat er ook RAM-geheugen (Random Access Memory 
— geheugen waar zowel uit gelezen als in geschreven kan worden) dat als enige 
nadeel heeft dat het wordt gewist zodra de computer wordt uitgeschakeld. Pro- 
gramma's die u schrijft en probeert, worden in eerste instantie in RAM-geheugen 
geschreven. Pas in een later stadium kunt u besluiten deze programma’s in een 
EPROM te ‘bakken’. Een EPROM is een iets minder permanent broertje van een 
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echte ROM-chip; de inhoud blijft bewaard als de stroom wordt uitgeschakeld, 
maar is door middel van ultraviolet licht te wissen. 


Om even op die fabelachtige snelheid terug te komen: machinetaal (mits goed 
geschreven) kan vele honderden malen sneller zijn dan welk BASIC-programma 
dan ook. Waar het BASIC altijd eerst dient te worden vertaald, is machinetaal 
meteen al verwerkingsklaar. 

Een nadeel van machinetaal is de geringere flexibiliteit en de noodzakelijke 
scherpere definitie. Een machinetaalprogramma is namelijk veel minder flexibel 
dan een programma dat is geschreven in een hogere programmeertaal (BASIC, 
PASCAL, C...) omdat het veel directer moet zijn geschreven. Denk bijvoorbeeld 
maar eens aan een simpele uitvoerroutine. In BASIC volstaat een PRINT- 
opdracht, die ook nog eens eenvoudig is te wijzigen. In machinetaal moet u al 
gauw een tiental instructies aanspreken en dan maakt u daarbij ook nog eens 
gebruik van systeem-ROM-routines. Om over het wijzigen nog maar niet te 
spreken! 

Ook moet de definitie van een machinetaalprogramma vrij volledig zijn. In negen 
van de tien gevallen blijkt een zelfgeschreven routine niet te werken omdat u 
ergens iets vergeten bent! Een gedegen systeemkennis is dan ook een eerste 
vereiste. Sterker nog: u zult moeten weten hoe een MSX-computer in elkaar 
steekt, voordat het verantwoord is om ook maar een byte in machinecode te 
testen! 


Gedegen systeemkennis dus. Waar hogere programmeertalen meestal vrij over- 
draagbaar zijn (een “10 PRINT” Hallo!” / 20 GOTO 10’-grapje in BASIC werkt 
immers altijd) is machinetaal uiterst persoonlijk. 

Zelfs al beschikken verschillende computers over dezelfde microprocessor, dan 
nog heeft u meestal met een totaal ander systeem te maken. Andere systeemrouti- 
nes, andere grafische mogelijkheden, andere randapparatuur enz... De machine- 
taalprogrammeur dient hier alles over te weten voordat hij ook maar één zinvolle 
byte programmeert! 


1.2 Het invoeren van machinecode 


Bij het invoeren van machinetaalprogramma'’s is de programmeeromgeving een 
probleem op zich. In BASIC kunt u alles klakkeloos intypen; het gaat goed totdat 
de computer met een ‘OUT OF MEMORY ERROR' of iets van dien aard komt 
aanzetten. In machinetaal weet u eigenlijk nooit precies wanneer het is afgelopen 
met de vrije ruimte, want dat bepaalt u zelf! Toegegeven dat er een onder- en 
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bovengrens aan de vrije geheugenruimte zit, maar dan nóg blijven er altijd slimme 
zijwegen over. 


Maar hoe komt de zelfgeschreven machinecode dan in het geheugen terecht? U 
hoeft niet te proberen om in BASIC een machinecode-instructie te gebruiken. Hoe 
exact overgenomen ook, u komt altijd met een 'SYNTAX ERROR' te zitten. 
Slim als u bent, komt u op het idee om de machinecode met behulp van DATA- 
regels te ‘“POK EN’. Een programma bestaat tenslotte uit allemaal getallen tussen 
Oen 255, zodat de juiste getallen in de juiste volgorde een werkend geheel moeten 
opleveren. U heeft volkomen gelijk, alleen is het een werkje waarmee zelfs de 
geduldigste monnik zwaar ‘in de stress’ raakt! 


Om machinecode te verwerken, bestaan er dan ook speciale hulpprogramma's. 
Twee soorten eigenlijk: assemblers en monitors. 

Een assembler is een veredelde tekst-editor waarmee u de machinecode ongeveer 
zoals teksten in een tekstverwerker kunt invoeren. Erg handig is het feit dat een 
assembler niet met exacte cijfers werkt maar met zogenaamde labels. Hierdoor 
kunt u het programma erg eenvoudig op een andere geheugenlocatie laten begin- 
nen. Het nadeel van een assembler is de grootte en de ‘lompheid’. Want echt snel 
en direct kunt u er meestal niet mee werken. 


Het snellere broertje van een assembler luistert naar de dubieuze naam ‘monitor’. 
Geen beeldbuis, maar wel iets om mee te ‘kijken’. Met een monitor kunt U direct 
in het geheugen van uw computer gluren. U kunt het geheugen als een tekst-dump 
aanschouwen, misschien in hexadecimale getallen, maar ook als een disassembly. 
Een disassembly-listing is precies het tegenovergestelde van een assemblerings- 
proces. Waar "het laatste uw teksten omzet naar zinvolle getallen en dus te 
verwerken machinecode, is een disassembly een omzetting van schier onbegrijpe- 
lijke getallen naar redelijk leesbare machinecode. 

Naast dit is het vanzelfsprekend ook mogelijk om met een monitor direct code te 
assembleren. Dit laatste gaat regelsgewijs maar het grote voordeel is wel dat u 
precies ziet WAT en WAAR u schrijft. Verder voorziet een monitor meestal in 
vele handige foefjes om het u allemaal zo gemakkelijk mogelijk te maken. 

In dit boek staat de listing van een echte machinetaalmonitor, de HERBY MON. 
Een speciaal geschreven produkt dat het mogelijk maakt alle voorbeelden die in 
dit boek staan meteen te proberen. 


Zoals gezegd een monitor. Een kwestie van even een paar slapeloze nachten in 
verband met het intypen, maar dan gaat er meteen een nieuwe wereld voor u open! 
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Het verwerken van de machinecode hoeft in het kader van dit boek dan ook 
helemaal geen problemen meer op te leveren. En natuurlijk kunt u de ingetypte 
monitor ook gebruiken om zelf programma’s te schrijven. 


2 De Z80-microprocessor 


2.1 Inleiding 


Zoals u inmiddels al weet, zit er in uw MSX een Z80-microprocessor. Allemaal 
leuk en aardig, maar veel verder helpt ons dat nog niet! 

In diverse andere boeken over machinetaal krijgt u eerst een hele verhandeling 
over het werken met de diverse getallenstelsels, maar waarom zouden we niet eerst 
kijken wat zo’n Z80 allemaal in huis heeft en wat het ding allemaal kan! In 
hoofdstuk 5 kunnen we dan altijd nog met cijfertjes stoeien, of u kunt er terecht als 
iets in dit hoofdstuk u (nog) niet helemaal duidelijk is. 


ni: INCrement / DECrenent 

n2: Indexcalculatie 

n3: Logische rekeneenheid 

ná: Koppeling databus (8 bits) 

n5: Koppeling adresbus (16 bits) 

n6: Koppeling controlebus 

n?; Buiten de Z80-microprocessor (geheugen en 10) 


OPC: Instructieregister / instructiedecoder / controle 


Afb. 2.1. Schematisch overzicht van de Z80 
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Een Z80-microprocessor beschikt over een aantal zaken: 


de program counter of programmateller (PC) 

de stack pointer of stapelwijzer (SP) 

de indexregisters: IX en TY 

het A-register of de accumulator 

zes algemene registers: B, C‚ D, E‚ Hen L (Ook als drie duo’s aan te roepen: BC, 
DE en HL) 

het flag-register F (als registerpaar in AF) 

het interrupt-register I 

het refresh-register R 

een set ‘verborgen’ registers A° tot en met L’ 


De laatste drie zijn nogal gevaarlijk en worden in dit boek niet gebruikt, temeer 
daar ze vooral zijn bedoeld voor specifiek intern gebruik. Pas als u over zeer veel 
machinetaalervaring beschikt, is het zinnig om ermee te stoeien. 


2.2 De program counter of programmateller 


De program counter of programmateller, PC vanaf nu, is een register dat uit twee 
bytes bestaat. Twee bytes bevatten namelijk 16 afzonderlijke bits, waardoor het 
bereik meteen is bepaald tot “2 tot de macht 16-1’, ofte wel het gebied dat loopt van 
$0000 tot SFFFF, hetgeen in totaal 65536 verschillende geheugenadressen ople- 
vert. (Allemaal afzonderlijk adresseerbaar!) 

Zo’n PC (niet te verwarren met de afkorting van Personal Computer!) is in iedere 
microprocessor aanwezig en heeft binnen iedere microprocessor ook nog eens 
dezelfde functie: het bijhouden van de juiste programma-adressering. De PC valt 
enigszins te vergelijken met een BASIC-regelteller. 


Afhankelijk van de instructie die wordt verwerkt, wordt de waarde van de PC 
beïnvloed. Een ‘gewone’ instructie verhoogt de PC steeds met één, net genoeg om 
de volgende instructie te lezen. Andere instructies verhogen de PC soms wel met 
twee, drie of vier, afhankelijk van de hoeveelheid bytes die zij nodig hebben om 
aan de slag te kunnen. Ook zijn er speciale instructies, spronginstructies bijvoor- 
beeld, die de PC van een volstrekt nieuwe waarde voorzien. 


Hoe ‘werkt’ een programma dan? Een voor de hand liggende vraag. U moet zich 
voorstellen dat er een koppeling bestaat tussen aan de ene kant de Z80-micro- 


processor en aan de andere kant het (meestal 64K) MSX-geheugen. De inhoud 
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van de PC wordt op een speciale 16-bits brede adreslijn gezet en naar het MSX- 
geheugen gestuurd, vervolgens wordt er een byte vanaf het zo geadresseerde 
PC-adres via een even speciale 8-bits brede datalijn naar de Z80-microprocessor 
gestuurd. .Enzovoort! Afhankelijk van de opgestuurde bytes verzorgt de Z80- 
processor de te volgen strategie en uw programma werkt — mits goed geprogram- 
meerd. 


2.3 De stack pointer of stapelwijzer 


De stack pointer, stapelwijzer of (vanaf nu) SP doet vermoeden dat er ook wel een 
‘stapel’ zal zijn! Vanzelfsprekend is dit het geval. 

Een stapel is een heel speciaal onderdeel van een microprocessor. Via deze stapel 
kan een aantal gegevens worden overgedragen. Het kan om gewone data gaan, 
maar ook adressen worden via de stapel doorgegeven. 


Het principe is uitermate simpel. Wat u als laatste op de stapel plaatst, komt er als 
eerste af. Denk maar eens aan de vuile vaat: het bovenste bord moet u eigenlijk als 
eerste afwassen. Zo niet dan komt alles naar beneden! 

Net als bij dit vergezochte voorbeeld kan er ook op stapelniveau van alles fout 
gaan. Als de stapel te hoog (letterlijk!) wordt, komt de boel naar beneden, hetgeen 
ook het geval is als u van onderen probeert weg te nemen. Heel goed oppassen dus! 
Het eigenlijke werken met zo’n stapel gaat door middel van twee speciale stapel- 
opdrachten. Als eerste is daar een speciale PUSH- of plaatsinstructie. Met zo’n 
instructie plaatst u iets bovenop de stapel. 

Behalve deze instructie bestaat er ook nog een POP- of pakinstructie, een instruc- 
tie waarmee u het laatst opgestapelde byte wegneemt. 


Ook de SP is een 16-bits register en kan het gehele geheugen adresseren. Een goede 
programmeur haalt evenveel van de stapel AF als hij er OP zet, waardoor een 
stapel eigenlijk nooit erg groot hoeft te worden. Als geheugengebied voor de 
stapel kiest u een slimme plaats die u toch niet gebruikt. (In BASIC voorziet het 
CLEAR-commando in een dergelijke mogelijkheid.) 


De stapel wordt voornamelijk gebruikt door de CALL-instructie. Een CALL is 
een subroutine in machinetaal. Wederom alles leuk en aardig maar als u een 
subroutine aanroept, wilt u dat na afloop het programma terugkeert op de juiste 
plaats: precies na die CALL-instructie. Hiertoe wordt de PC op de stapel ge- 
plaatst, vervolgens krijgt de PC het adres van de subroutine als waarde. Is de 
subroutine eenmaal uitgevoerd dan wordt de ‘oude’ waarde weer van de stapel 
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genomen en gaat het programma weer verder vanaf de juiste plaats. Nu begrijpt u 
meteen waarom u zeer voorzichtig moet zijn met deze stapel; als u er teveel opzet 
of afhaalt gaat er onherroepelijk ergens iets fout. 


2.4 De indexregisters: IX en TY 


Indexregisters voorzien in een speciale manier van adresseren. De inhoud van een 
indexregister wordt (uiteraard op voorwaarde dat er een index-adresseringsvorm 
is gebruikt) automatisch opgeteld bij een eveneens opgegeven basiswaarde. Hier- 
door kan de machinetaalprogrammeur vrij makkelijk een reeks van opeenvol- 
gende waarden bereiken. Denk hiervoor aan het werken met tabellen van dezelfde 
lengte. De indexregisters worden ook vaak gebruikt bij de behandeling van 
ARRA Y-achtige structuren. 


In speciale gevallen kan het erg handig zijn om gebruik te maken van deze 
registers, maar dat moet iedere programmeur maar voor zichzelf uitmaken. U 
kunt ook heel goed zonder! 

We komen hierop nog terug in het volgende hoofdstuk, waarin we alle mogelijke 
vormen van adresseren bekijken. 


2.5 Het A-register of de accumulator 


De accumulator is verreweg het meest gebruikte register in Z80-machinecodepro- 
gramma's. Bijna alle belangrijke instructies doen iets met de inhoud van de 
accumulator. Vaak vindt een operatie plaats OP de waarde die zich op dat 
moment in de accumulator bevindt, waarna het resultaat weer IN deze accumula- 
tor wordt teruggezet. 

Er zijn zelfs diverse handige dataverplaatsinstructies die alleen maar met behulp 
van de accumulator hun werk kunnen doen. 


2.6 De zes algemene registers: B, C, D, E‚ H en L 


Deze registers werken ongeveer als de accumulator, alleen is het gebruik helaas 
veel beperkter. Een zeer groot voordeel is het feit dat deze registers in drie paren 
aan elkaar kunnen worden gekoppeld, waardoor 16-bits berekeningen mogelijk 
zijn. 

Ook kunt u de registerparen gebruiken voor adresseringsdoeleinden. Met name 
het HL-paar is dan erg handig! 
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Aan het B-register is trouwens ook nog een speciale ‘DJNZ'-instructie gekoppeld. 
Meer hierover in een later stadium. 


2.7 Het flag-register F 


Minstens net zo belangrijk, zo niet belangrijker dan de accumulator is het flag- 
register. Dit register voorziet onder andere in speciale testmogelijkheden. 

In dit F-register bevinden zich namelijk zes onderdelen met ieder een aparte 
functie. Sommige zijn afzonderlijk te testen en worden binnen een programma 
gebruikt om te kijken of bepaalde condities optreden: nul, niet nul, groter dan, 
kleiner dan, enz. Andere zijn alleen behulpzaam binnen bepaalde berekeningsvor- 
men. 


fb 3 3 5 2 42 B 


sja) nj poln 


Afb. 2.2. Het flag-register 


De carry ofte wel het C-bit. De carry wordt gebruikt als extra bit bij berekenin- 
gen en/of schuifoperaties. U kunt testen met ‘C° voor een carry op Ì, en met 
‘NC’ voor een carry op 0. 


ho 


De subtract flag of ook wel het N-bit. Dit bit wordt geset bij een aftrekking. Het 
is alleen van belang bij BCD-berekeningen. 


eed 


De parity/overflow-flag, het P/V-bit. Bij rekenkundige bewerkingen wordt deze 
flag geset als er een overflow optreedt. Bij logische bewerkingen wordt dit bit 
geset als het resultaat een even aantal enen oplevert, anders wordt dit bit 0 
gemaakt. U test met ‘PO’ op een oneven pariteit en met ‘PE’ op een even 
pariteit. 


4 De half carry-flag of het H-bit. Dit bit is alleen van belang bij BCD-berekenin- 
gen. Het H-bit wordt geset als er van bit 3 naar bit 4 een carry optreedt van bit 3 
naar bit 4. 


5 De zero-flag of het Z-bit. Een heel belangrijke test-mogelijkheid aangezien dit 
Z-bit wordt geset als het resultaat van een bewerking nul oplevert. Er staat een 0 
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in het Z-bit als een resultaat ongelijk is aan nul. U kunt testen met ‘Z’ op een 
resultaat dat gelijk is aan nul, u test met ‘NZ’ op een resultaat dat ongelijk is aan 
nul. 


6 De sign-flag of het S-bit. Dit bit wordt 1 als het resultaat van een bewerking 
negatief is en O als dat resultaat positief is. U test met ‘P’ op een positieve waarde 
en met ‘M’ op een negatieve waarde. 


Nog even alle tests op een rijtje: 


test betekenis 

resultaat gelijk aan nul 
resultaat ongelijk aan nul 
carry 

geen carry 

oneven pariteit 

even pariteit 

positief resultaat 
negatief resultaat 


ZUmZZOZN 


2.8 Het interrupt-register I 


Dit register wordt exclusief gebruikt in interrupt mode 2 (IM 2) om een speciale 
vector-call te genereren. In het I-register wordt het high-byte voor de sprong 
bewaard, terwijl het apparaat dat de interrupt aanlevert voor het low-byte zorgt 
(hierover straks meer). 


2.9 Het refresh-register R 


Dit register wordt gebruikt voor een automatische refresh van het dynamische 
geheugen. U zult dit register waarschijnlijk nooit in zelfgeschreven programma’s 
gebruiken. Voor de volledigheid misschien leuk om te weten dat het bestaat. 


2.10 De set ‘verborgen’ registers A’ tot en met L’ 


U kunt deze ‘extra’ set registers met bijvoorbeeld het EXX-commando ‘swappen’ 
(verwisselen) met de gewone registers. Dit kan in enkele gevallen handig zijn. 
Normaal gesproken is het beter om alleen met de gewone registerset te werken, in 
verband met verwarringsverschijnselen. 
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3 Adresseringstechnieken 


Laten we aannemen dat u nu begrijpt wat een Z80-microprocessor in huis heeft. 
Voordat we alle instructies gaan bespreken, is het misschien zinvol om eens te 
bekijken hoe u de diverse commando's kunt aanroepen, of hoe u ze gaat ‘adresse- 
ren’! 

Adresseren zullen we binnen dit kader verbasteren tot ‘aanroepen’. Want in de 
verschillende vormen van aanroepmogelijkheden ligt de kracht van het werken 
met machinetaal. 

Waar moet u aan denken? Een simpel voorbeeld: u wilt (gewoon in het dagelijks 
leven) informatie doorspelen. Het eenvoudigst en snelst gaat zoiets als u meteen 
spreekt met degene voor wie die informatie is bestemd. U kunt ook een brief 
posten, maar dan zit de PTT ertussen. Ook kunt u de telefoon gebruiken, of VAX, 
telex enz. Het hele systeem is erop gebaseerd dat de informatie op/aan het juiste 
adres komt. Dus: dezelfde informatie, verschillende doorgeefmethoden! 
Ongeveer zo werkt u met de diverse aanroepformaten in machinecode. En er zijn 
nogal wat van die verschillende Z80-mogelijkheden: 


impliciete adressering 
onmiddellijke adressering 
absolute adressering 

zero page adressering 
relatieve adressering 
geïndexeerde adressering 
indirecte adressering 
bitadressering 


Het is heel erg belangrijk dat u weet wat er allemaal mogelijk is binnen machine- 
taalprogrammering en dan met name bij het werken met de Z80-microprocessor. 
Slaat u het komende onderdeel dan ook zeker niet over. Het gebrek aan kennis 
kan u dan lelijk opbreken als u weer eens op zoek gaat naar het hoe en waarom van 
een instructie! 
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3.1 Impliciete adressering 


Bij ‘impliciete adressering’ gaat het vaak om bewerkingen die van toepassing zijn 
op één of twee specifieke registers. Het gaat om simpele instructies waarbij geen 
adres nodig is, omdat de instructie zichzelf al documenteert. 

Hierbij moet u denken aan korte instructies die meestal ook zeer snel zijn, 
bijvoorbeeld: INC B, RLA, SBC A, OR A, enz. 


Met de Z80-microprocessor in gedachten kunnen we eigenlijk nog wel wat 
instructies onder deze noemer meenemen. Hierbij gaat het om instructies die van 
toepassing zijn op onder andere ‘registerparen’. Bijvoorbeeld: EX AF,AF’, INC 
DE, DEC SP of LD A‚(HL). 


3.2 Onmiddellijke adressering 


In dit geval wordt de code die aangeeft om welke instructie het gaat, gevolgd door 
nog een enkel byte of in sommige gevallen zelfs door twee bytes (een word). Een 
byte voor een 8-bits getal, een word voor een 16-bits getal. 

Het gaat hier dus altijd om zeer directe gevallen zoals bijv. LD BC,S1234, LD 
B,$00, SBC A,SFF of AND S$11. 


3.3 Absolute adressering 


Er zijn altijd drie bytes nodig voor absolute adressering. Het eerste byte bevat de 
opcode en de twee volgende bytes geven het gewenste adres. Het eerste byte is het 
‘low-byte’ en levert een waarde tussen O en 255, het tweede byte noemen we het 
‘high-byte’ en staat voor een waarde tussen 256 en 65280. Met andere woorden: 
het adres is de waarde ‘high byte’ x 256 + ‘low byte’. 

Dit gegeven wil nogal eens wat verwarring stichten. Let daarom goed op de 
tegenstrijdige verschijningsvormen, want in het geheugen staat een word dus in de 
volgorde laag/hoog opgeslagen; een monitor of assembler verwacht echter de (ons 
vertrouwde) hoog/laag-volgorde! 


Het gaat dus om een adres. Voor bepaalde instructies zoals bijvoorbeeld de 
spronginstructie en de subroutine-instructie is dit adres alleen van belang als 
PC-waarde. Voor andere instructies, bijvoorbeeld een load-instructie of een store- 
instructie, is het adres nodig in verband met de waarde die zich op die geadres- 
seerde geheugenplaats bevindt. Een paar voorbeelden: JP $0000, CALL $00CO, 
LD A.($SE000). LD ($E000),A enz. 
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3.4 Zero page-adressering 


Voor sommige microprocessors geldt dat het werken met zero page-adressering is 
verheven tot een aparte kunstvorm. In een Z80 daarentegen is er in feite maar één 
instructie die het speciaal in de zero page (De eerste 256 bytes van het geheugen, de 
geheugenplaatsen $0000 tot en met $SOOFF) zoekt. 

Het gaat hier om een speciale CAL L-instructie die in acht verschillende formaten 
voorkomt. Een zeer snelle instructie, die voorziet in een routineruimte van 8 bytes. 
Bijvoorbeeld: RST 00, RST 08, RST 16 enz. 


3.5 Relatieve adressering 


Relatieve adressering gebruikt twee bytes. Het eerste byte verstrekt de opcode en 
het tweede byte verzorgt de verplaatsing. In tegenstelling tot de absolute adresse- 
ringsvorm is de relatieve adresseringsvorm verplaatsbaar. Logisch, want de posi- 
tieve of negatieve sprongcalculatie hangt alleen maar af van de waarde van de PC 
op dat moment. Een positieve verplaatsing (In het tweede byte staat bit 7 op nul: 
%Oxxxxxxx) wordt bij de PC opgeteld. Een negatieve verplaatsing (Bit 7 van het 
tweede byte is geset: % 1xxxxxxx) wordt van de PC afgetrokken. Bijvoorbeeld: JR 
$C000 op het adres $CO10 is toegestaan. JR $CO00 op het adres $D010 is niet 
toegestaan! 

Let wel goed op, aangezien u heel gemakkelijk deze ‘branch’-grens overschrijdt 
(De HERBYMON geeft gelukkig een waarschuwing). 


3.6 Geïndexeerde adressering 


Geïndexeerde adressering is een adresseringsmogelijkheid die vooral handig is 
voor het werken met tabellen. Heel erg nuttig als de elementen uit zo’n tabel elkaar 
opvolgen, aangezien u dan van dezelfde bewerkingsinstructie gebruik kunt blijven 
maken terwijl u toch alle tabelingangen kunt adresseren. 


Hoe werkt zoiets? In het indexregister (IX of TY) staat een adres, meestal het begin 
van een tabel. Bij dit adres wordt een eventuele verplaatsing opgeteld en zodoende 
ontstaat een eindadres dat op ongeveer dezelfde manier als bij de directe adresse- 
ringsvorm kan worden gebruikt. 

U heeft nu verschillende mogelijkheden. U verandert het indexregister (met 
speciale increment- of decrement-instructies) of u zorgt voor variërende verplaat- 
singen. In het ene geval doorloopt u een tabel met variërende lengte en in het 
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Geheugen { 
| em 


Tabel 


(Tabel + Verplaatsing) 


Afb. 3.1. Geïndexeerde adressering 


andere geval kunt u een meervoudige tabel eenvoudig bewerken. 
In Z80-machinecode kunt u deze geïndexeerde adressering op een aantal instruc- 
ties loslaten. Bijvoorbeeld: ADD, INC, RLC, LD, SET enz. 


3.7 Indirecte adressering 


Indirecte adressering is een redelijk complexe adresseringsvorm waarbij gebruik 
wordt gemaakt van een pointer-structuur. U moet zich voorstellen dat u een 
bepaald adres aanspreekt. Op dit adres bevindt zich een 16-bits waarde die wijst 
naar een bepaalde geheugenlocatie. En pas in deze locatie vindt u het gewenste 
getal. 

Eigenlijk is het een ‘dubbele’ adressering. U gebruikt deze adressering voorname- 
lijk om erg snel een aantal verplaatste tabelgebieden te kunnen bereiken! 


Met de Z80-microprocessor doet u dit voornamelijk met de registerparen BC, DE 
en HL. Deze dienen dan als link-adres. Bijvoorbeeld: LD A,(DE), LD B‚(HL), 
OR (HL) enz. 
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Geheugen 


Indirect-Lou 
4 Indirect-High 
Geadresseerde waarde 


Afb. 3.2. Indirecte adressering 


3.8 Bitadressering 


Bitadressering duidt op de mogelijkheid om aparte byte-onderdelen te kunnen 
aanspreken. Een byte bestaat uit acht afzonderlijke bits, genummerd van 0 tot en 
met 7. 

In sommige gevallen heeft u voldoende aan bitinformatie en het zou in zo’n geval 
erg handig zijn om zo’n bit rechtstreeks te kunnen aanspreken. De Z80-micropro- 
cessor heeft ook hiervoor een aantal mogelijkheden, zoals de instructies BIT, RES 
en SET. 
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4 De complete instructieset van de 
Z80 


U weet inmiddels van de hoed en de rand voor wat betreft de belangrijkste Z80- 
principes. We gaan nu dan ook de hele Z80-instructieset de revue laten passeren. 
In alfabetische volgorde worden alle afzonderlijke instructies besproken. Als u 
reeds bekend bent met de instructieset heeft u voldoende aan appendix A, waarin 
u ook terecht kunt voor de juiste codering, de flag-beïnvloeding en de tijds- 
duur...en niet te vergeten de juiste HERB YMON-syntax en alle mogelijkheden! 
We gaan hier alleen kijken wat die instructies nu precies doen. Waar nodig krijgt u 
ook extra informatie. Geen zorgen als u iets niet begrijpt; in de hierop volgende 
hoofdstukken komen we overal nog uitgebreid op terug. 


4.1 Even vooraf 


In appendix A staan alle bestaande Z80-instructies nog eens goed beschreven. 
Wilt u precies weten wat er mogelijk is of van welke HERB YMON-syntax u zich 
moet bedienen dan kunt u zich beter in deze appendix oriënteren. In het nu 
volgende overzicht onderzoeken we alleen hoe alle instructies nu precies werken. 
Het valt daarom buiten het kader van dit overzicht om van alle verschijningsvor- 
men een instructie te geven. 

We maken slim gebruik van enige afkortingen: 


rr r b co zp 
AF A 0 Z 00 
BC B l NZ 08 
DE C 2 6 10 
HL D 3 NC 18 
IX E Bi Po 20 
TY H 5 PE 28 
SP E 6 P 30 

7 M 38 


Bij rr gaat het veelal om een speciale selectie, zie hiervoor de appendix! 

Kijk ook voor co nog even in de appendix. Afwijking in een heel enkel geval. 
nn wil zeggen dat we met een byte-waarde te maken hebben. 

ü iseen afkorting van ‘IX + nr’ of ‘TY + nn’. 

nnnn is een adres of een word. 

Een logische AND wordt als „and. genoteerd. 

Een logische OR wordt als ‚or. genoteerd. 

Een relatieve sprongcalculatie wordt als „rel. genoteerd. 

Een logische XOR wordt als .xor. genoteerd.) 


4.2 De instructies op een rij 


ADC 


Dit is een algemene optel-met-carry-instructie. De gegeven (tweede) operand 
wordt samen met de carry-flag uit het statusregister bij de eerste operand opgeteld 
waarna het resultaat weer in de eerste operand terechtkomt. 


Formaat 
ADC Ar 
ADC Ann 
ADC A‚(HL) 
ADC A(ií) 
ADC HL.rr 


ADD 


Functie 

A — A +r+ carry 

A — A + an + carry 

A «— A + (HL) + carry 
A — A + (ii) + carry 
HL — HL + rr + carry 


Dit is een algemene optelinstructie. De tweede operand wordt bij de eerste 
opgeteld waarna het resultaat in de eerste wordt geplaatst. (Let wel, zonder carry!) 


Formaat 
ADD Ar 
ADD Ann 
ADD A.(HL) 
ADD A(ií) 
ADD HLrr 
ADD IX rr 
ADD IY rr 


Functie 

A «-—A+r 

A <— A + nn 
A — A + (HL) 
A <A + (ii) 
HL — HL + rr 
IX « IX + rr 
IY «…— IY + rr 


AND 


Dit is een logische AND-operatie die wordt uitgevoerd op de accumulator en de 
aangegeven operand. Het resultaat wordt weer in de accumulator geplaatst (let 
ook even op de waarheidstabel). 


Formaat Functie 

AND r A «— A and. r 
AND nn A — A and. an 
AND (HL) A — A and. (HL) 
AND (ii) A «— A and. (ií) 
A B A and B 

0 0 0 

0 | 0 

| 0 0 

l l | 

BIT 


Dit is een test op het opgegeven bit uit een geadresseerde operand. Het resultaat 
beïnvloedt de zero-flag overeenkomstig de bitwaarde. (Bit ‘0’ dan zero-flag geset, 
bit *1’ dan zero-flag gecleard.) 


Formaat Functie 

BIT hr Ze ‘Test’ bit bin r 
BIT h‚(HL) Z « ‘Test’ bit hin (HL) 
BIT h(ií) Z « ‘Test’ bit b in (ii) 
CALL 


Er wordt een subroutine op het opgegeven adres aangeroepen. 
De inhoud van de programmateller wordt op de stapel gezet. Uit de twee bytes die 
op de instructiecode volgen, komt het nieuwe adres; dit wordt in de PC geplaatst. 
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Formaat Functie 

CALL annn (SP — 1) — PC-high 
(SP — 2) «— PC-low 
PC — nnnn 
SP «— SP — 2 


Progranna St 


CALL S1 
CALL 52 


Afb. 4.1. Werken met subroutines 


CALL cc 


Indien aan de voorwaarde cc wordt voldaan, wordt een subroutine op het 
meegegeven adres aangeroepen. (De inhoud van de huidige programmateller 
wordt op de stapel gezet. Uit de twee bytes die volgen op de instructiecode komt 
het nieuwe adres, dit wordt in de PC geplaatst.) Als daarentegen niet aan de 
voorwaarde cc wordt voldaan, wordt de instructie overgeslagen. 


Formaat Functie 

CALL ce,nnnan (SP — 1) « PC-high 
(SP — 2) « PC-low 
SP «- SP — 2 
PC «— nnnn 
ERM rnts.ct waart P'* 
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CCF 


Complementeer de carry-flag. (0—1 / 1—>0) 


Formaat Functie 
CCF carry « carry .xor. Ì 
GE 


Vergelijk de opgegeven operand met de accumulator. 

Dit komt in principe neer op een aftrekking zonder carry waarna het resultaat 
wordt weggegooid. 

Na afloop kan eventueel op een aantal voorwaarden worden getest : 


Test Acecumulator is. .in vergelijking met de operand 
NC groter/gelijk (>=) 
C kleiner (<) 

NZ ongelijk (<>) 
fÂ gelijk (==) 
NC/NZ _ groter ) 

GZ kleiner/gelijk (==) 
Formaat Functie 

GE flags o.i.v. A —r 

CP nn flags o.i.v. A — nn 
CP (HL) flags o.i.v. A — (HL) 
CP (ii) flags o.i.v. A — (ii) 
CPD 


Vergelijking met automatische verlaging. 

De inhoud van het door (HL) geadresseerde byte wordt van de accumulator 
afgetrokken. Het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud van 
zowel HL als BC met één verlaagd. (Wordt veel gebruikt voor gecontroleerde 
blokvergelijkingen.) 


ond 
Led 


Formaat Functie 


CPD flags o.i.v. A — (HL) 
HL «— HL — | 
BC « BC — | 
CPDR 


Blokvergelijking met automatische verlaging, alleen wordt dit net zolang her- 
haald tot “BC = 0’ of als ‘A = (HL)’. 

De inhoud van het door (HL) geadresseerde byte wordt van de accumulator 
afgetrokken, het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud van 
zowel HL als BC met één verlaagd. Nu wordt gekeken of ‘BC =0’ of 
‘A = (HL). .is dit niet het geval dan wordt de instructie nogmaals uitgevoerd. 


Formaat Functie 

CPDR flags o.i.v. A — (HL) 
HL — HL — | 
BC «— BC — | 


net zolang herhaald tot “BC = 0’ of ‘A = (HL) 


CPI 


Vergelijking met automatische verhoging. 

De inhoud van het door (HL) geadresseerde byte wordt van de accumulator 
afgetrokken, het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud van 
HL met één verhoogd en de inhoud van BC met één verlaagd. Wordt veel gebruikt 
voor gecontroleerde blokvergelijkingen. 


Formaat Functie 
CPI flags o.i.v. A — (HL) 
HL — HL + 1 
BC «— BC — 1 
CPIR 


Blokvergelijking met automatische verhoging, alleen wordt dit net zolang her- 
haald totdat ‘BC = 0’ of ‘A = (HL). 
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De inhoud van de door (HL) geadresseerde geheugenplaats wordt van de accumu- 
lator afgetrokken, het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud 
van HL met één verhoogd en de inhoud van BC met één verlaagd. Nu wordt 
gekeken of ‘BC = 0’ of ‘A = (HL)’. Is dit niet het geval dan wordt de instructie 
nogmaals uitgevoerd. 


Formaat Functie 

CPIR flags o.i.v. A — (HL) 
HL « HL + | 
BC « BC — 1 


net zolang herhaald tot ‘BC = 0’ of ‘A = (HL) 


CPL 


Complementeer de accumulator. 
De inhoud van de accumulator wordt geïnverteerd (Bits die ‘0’ zijn worden “1 en 
andersom) en weer in de accumulator geplaatst. 


Formaat Functie 
CPL A «— Axor. SFF 
DAA 


Maak de inhoud van de accumulator ‘packed BCD’. 

Er wordt voorwaardelijk zes (6) opgeteld bij het rechter-en/of linkernybble van de 
accumulator. Deze optelling is onder meer afhankelijk van de inhoud van het 
statusregister. U gebruikt deze instructie veelal NA een rekenkundige bewerking, 
om zo het resultaat (weer) BCD te krijgen. 


Formaat Functie 
DAA A « packed BCD 
DEC 


De geadresseerde operand wordt met één verlaagd waarna het resultaat weer in 
diezelfde operand terechtkomt. 
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Formaat Functie 


DEC r ter 

DEC (HL) (HL) — (HL) — | 
DEC (ii) (ii) — (HL) — | 
DEC rr re rr —Ì 

DEC IX IX «IX — | 
DEC TY IY -IY —1 

DI 


Na deze instructie worden geen interrupts meer uitgevoerd. Een speciale inter- 
rupt-flag wordt O0 gemaakt, met als gevolg dat er geen maskeerbare interrupts 
meer worden ‘doorgelaten’. Na de El-instructie worden wel weer interrupts 
toegestaan. (U kunt deze instructie ook in een interrupt gebruiken, om eventueel 
volgende interrupts te elimineren.) 


Formaat Functie 
DI IEF «…— 0 
DINZ 


Het register B wordt met één verlaagd en er wordt relatief gesprongen als het 
resultaat van de verlaging NZ opleverde. (Deze instructie is natuurlijk ideaal voor 
programmalussen die altijd een van tevoren vastgestelde ‘doorlooplengte’ heb- 
ben. FOR... .NEXT-simulatie dus.) 


Formaat Functie 

DJNZ nn B<«- B —I 
als NZ dan PC « PC rel. an 
als Z dan volgende instructie 


EI 
Na deze instructie worden weer interrupts uitgevoerd. Een speciale interrupt-flag 
wordt geset met als gevolg dat er weer maskeerbare interrupts worden doorgela- 


ten. 
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Formaat Functie 
El IFF + | 


EX 


Verwissel de opgegeven operands met elkaar. (Te vergelijken met het BASIC 
SWAP-commando.) 

De inhoud van de geadresseerde operands wordt verwisseld met die van hun 
tegenhangers. Deze alternatieve registers bevinden zich in een aparte register- 
bank. 


Formaat Functie 

EX AF,AF’ AF «-— AF 

EX DE,HL DE «— HL 

EX (SP),HL H «> (SP + I) 
L «<-> (SP) 

EX (SP)IX IX-high — > (SP + 1) 
IX-low «— (SP) 

EX (SP).IY IY-high «—— (SP + 1) 


IY-low «— (SP) 


EXX 


Verwissel de BC-, DE- en HL- ‘gewone’ registers met hun ‘alternatieve’ tegenhan- 
gers. 


Formaat Functie 

EXX BC « — BC’ 
DE -—— DE’ 
HL —— HL’ 

HALT 


De werking van de Z80-microprocessor wordt stilgelegd. 
Na de HALT-instructie worden alleen nog maar NOP's uitgevoerd. Dit alles 
gebeurt totdat een interrupt plaatsvindt of een reset wordt gegeven. 
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Formaat Functie 
HALT CPU gaat ‘op slot’ 


IM 0 


Kies interrupt-mode 0. (Het apparaat of de chip dat de interrupt genereert, zet de 
uit te voeren instructie op de databus.) 


Formaat Functie 
IM 0 Interrupt-mode 0 
IM 1 


Kies interrupt-mode |. (Er wordt een ‘RST 38’-instructie uitgevoerd als er een 
interrupt optreedt.) 


Formaat Functie 
IM 1 Interrupt-mode 1 
IM 2 


Kies interrupt-mode 2. (Het apparaat of de chip dat de interrupt genereert, zet het 
low-byte van een sprongadres op de databus. Het I-register zorgt voor het high- 
byte.) 


Formaat Functie 
IM 2 Interrupt-mode 2 
IN r(C) 


Via het C-register wordt een randapparaat of een chip (zie appendix) geadres- 
seerd. Dit randapparaat wordt uitgelezen en het resultaat komt in het gewenste 
register te staan. 


Ei, 


Formaat Functie 
IN r.(C) re (C) 
IN A‚(an) 


Het door middel van ‘nn’ geadresseerde randapparaat (of een geadresseerde chip) 
wordt uitgelezen. Het resultaat wordt in de accumulator geplaatst. 


Formaat Functie 
IN A(zn) A « (nn) 
INC 


De geadresseerde operand wordt met één verhoogd, waarbij het resultaat weer in 
diezelfde operand terecht komt. 


Formaat Functie 

INC r re r+l 

INC (HL) (HL) — (HL) + 1 
INC (ii) (ii) — (HL) + 1 
INC rr rra rr + Ì 

INC IX IX «IX + 1 
INC IY IY « IY +1 
IND 


Input met automatische verlaging. Het randapparaat dat door het C-register is 
geadresseerd, wordt uitgelezen. Het verkregen resultaat komt in het adres waar 
(HL) op dat moment naar wijst. Na afloop worden zowel HL als B met één 
verlaagd. 


Formaat Functie 

IND (HL) — (C) 
B B-—l 
HL «— HL — 1 
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INDR 


Blok-input met automatische verlaging. Het randapparaat dat door het C-regis- 
ter is geadresseerd, wordt uitgelezen. Het resultaat komt in het adres waar (HL) 
op dat moment naar wijst. Na afloop worden zowel HL als B met één verlaagd. 
Als B ongelijk aan nul is, wordt de instructie nogmaals uitgevoerd. 


Formaat Functie 
INDR (HL) — (C) 
B B-— | 
HL — HL — | 


net zolang herhaald tot ‘B = 0’ 


INI 


Input met automatische verhoging. Het randapparaat dat door het C-register is 
geadresseerd, wordt uitgelezen. Het resultaat komt in het adres waar (HL) op dat 
moment naar wijst. Na afloop wordt HL met één verhoogd en B met één verlaagd. 


Formaat Functie 
INI (HL) — (C) 
B B—I 
HL « HL + | 
INIR 


Blok-input met automatische verhoging. Het randapparaat dat door het C-regis- 
ter is geadresseerd, wordt uitgelezen, het resultaat komt in het adres waar (HL) op 
dat moment naar wijst. Na afloop wordt HL met één verhoogd en B met één 
verlaagd. Als B ongelijk aan nul is, wordt de instructie nogmaals uitgevoerd. 


Formaat Functie 

INIR (HL) — (C) 
B B-—l 
HL « HL + 1 


net zolang herhaald tot “B = 0’ 
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JP 


Er wordt gesprongen naar het adres dat in de opgegeven operand staat. 
De JR-instructie levert twee bytes aan die in de PC worden geplaatst. Bij de 
eerstvolgende instructie werkt het programma vanaf die plaats. 


Formaat Functie 

JP nnnn PC — nann 
JP (HL) PC « HL 
JP (IX) PC «IX 
JP (IY) PC «— IY 
JP cc 


Indien aan ce wordt voldaan, wordt een sprong naar het opgegeven adres ge- 
maakt. 

Indien cc klopt, levert de JR-instructie twee bytes aan die in de PC worden 
geplaatst. Bij de eerstvolgende instructie werkt het programma vanaf die plaats. 
Wordt niet aan cc voldaan dan wordt de instructie verder genegeerd. 


Formaat Functie 
JP cc‚nnnn PC — nnnn 
“et mmtsecwaar” ** 


JR 

Er wordt een relatieve sprong gecalculeerd en gemaakt. 

Er wordt gebruik gemaakt van het positief of negatief zijn van de meegeleverde 
waarde. Deze waarde wordt bij de PC opgeteld (of afgetrokken) om zo het nieuwe 


adres te verkrijgen. Hierdoor zijn sprongen van — 126 tot + 129 mogelijk. 


Formaat Functie 
JR nn PC « PC rel. an 
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JR cc 


Indien aan cc wordt voldaan, wordt een sprong gecalculeerd en gemaakt. 

Als ce klopt, wordt er gebruik gemaakt van het positief of negatief zijn van de 
meegeleverde waarde. Deze waarde wordt bij de PC opgeteld (of ervan afgetrok- 
ken) om zo het nieuwe adres te verkrijgen. Als niet aan de gestelde conditie cc 
wordt voldaan, wordt de instructie verder genegeerd. 


Formaat Functie 
JR cec‚nn PC «— PC rel. nn 
“ £ XN mits.ce waar* * * 


LD 


Er wordt een ‘load/store’-instructie uitgevoerd. Dit is de meest veelzijdige Z80- 
instructie. In principe komt het neer op ‘data-verplaatsing’. 

De inhoud van de tweede geadresseerde operand wordt in de eerste geadresseerde 
operand geplaatst. De LD-instructie dient dus tegelijkertijd als ‘load’- en ‘store’- 


instructie. 


Formaat 
LD rr‚(nnnn) 


Functie 
rr-low « (71) 
rr-high « (nn + 1) 


LD rr‚nnan rre- nnnn 

LD r‚nn re nn 

LD rr’ rr’ 

LD (rr),A (rr) — A 

LD (HL).nn (HL) — an 

LD (HL),r (HL) «— r 

LD r‚(ii) re (ii) 

LD (ii),nn (ii) — nn 

LD (ij).r (ii) — r 

LD Annan) A « (nnann) 

LD (nann),A (nnnn) — A 

LD (nnnn).rr (an) — rr-low 
(nn + 1) « rr-high 

LD A(rr) A « (rr) 

LD Al A « I 
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LD LA Ie A 


LD A‚R A-R 
LD R‚A R «A 
LD SP.rr SP — rr 
LD r,(HL) re (HL) 
LDD 


Laden met automatische verlaging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (DE) 
geadresseerde locatie geplaatst. Vervolgens worden BC, DE en HL met één 
verlaagd. 


Formaat Functie 

LDD (DE) — (HL) 
DE — DE — | 
HL « HL — | 
BC — BC — | 

LDDR 


Blok laden met automatische verlaging. De inhoud van de door (HL) geadres- 
seerde geheugenplaats wordt in de door (DE) geadresseerde locatie geplaatst. 
Vervolgens worden BC, DE en HL met één verlaagd. Nu wordt gekeken of 
‘BC = 0’. Als dit het geval is, wordt de lus onderbroken. Zo niet dan wordt de 
instructie nogmaals uitgevoerd. 


Formaat Functie 

LDDR (DE) — (HL) 
DE «— DE — | 
HL «— HL — | 
BC «— BC — | 


net zolang herhaald tot “BC = 0’ 
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LDI 


Laden met automatische verhoging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (DE) 
geadresseerde locatie geplaatst. Vervolgens worden DE en HL met één verhoogd. 
BC wordt met één verlaagd. 


Formaat Functie 

LDI (DE) — (HL) 
DE — DE + 1 
HL — HL + 1 
BC «— BC — 1 

LDIR 


Blok laden met automatische verhoging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (DE) 
geadresseerde locatie geplaatst. Vervolgens worden DE en HL met één verhoogd. 
BC wordt met één verlaagd. Nu wordt gekeken of BC gelijk is aan nul. Is dit het 
geval dan wordt de lus onderbroken. Zo niet dan wordt de instructie nogmaals 
uitgevoerd. 


Formaat Functie 

LDIR (DE) « (HL) 
DE — DE + 1 
HL — HL + | 
BC «— BC — 1 


net zolang herhaald tot ‘BC = 0’ 


NEG 
Trek de accumulator af van nul (0). 


Formaat Functie 
NEG A <«-0—A 
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NOP 


‘Loze’ operatie, er wordt gedurende 1 cyclus niets gedaan. 


Formaat Functie 
NOP niets 
OR 


Dit is een logische OR-operatie die wordt uitgevoerd op de accumulator en de 
aangegeven operand. Het resultaat wordt weer in de accumulator geplaatst. Let 
ook even op de waarheidstabel. 


Formaat Functie 

OR r A «— A or.r 
OR zn A <— A or. an 
OR (HL) A <— A or. (HL) 
OR (ii) A «— A or. (ii) 
A B A or B 

0 0 0 

0 1 | 

l 0 l 

l 1 | 

OTDR 


Blok-output met automatische verlaging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (C) 
geadresseerde output-poort geplaatst. HL en B worden dan met één verlaagd. Als 
B nog niet gelijk aan nul is, wordt de instructie nogmaals uitgevoerd, in het andere 
geval wordt de lus onderbroken. 


Formaat Functie 

OTDR (C) — (HL) 
BB -—lI 
HL «— HL — 1 


net zolang herhaald tot ‘B = 0’ 


OTIR 


Blok-output met automatische verhoging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (C) 
geadresseerde output-poort geplaatst. HL wordt met één verhoogd en B wordt 
met één verlaagd. Als B nog niet gelijk aan nul is, wordt de instructie nogmaals 
uitgevoerd, in het andere geval wordt de lus onderbroken. 


Formaat Functie 

OTIR (C) «— (HL) 
B B-—l 
HL — HL + | 


net zolang herhaald tot “B = 0' 


OUT (Or 


Plaats het register r in de via (C)’ geadresseerde output-poort. 


Formaat Functie 
OUFIC)r (C) « r 
OUT (an),A 


Plaats de accumulator in de door ‘nn’ geadresseerde output-poort. 


Formaat Functie 
OUT (n7).A (an) — A 
OUTD 


Output met automatische verlaging. 
De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (C) 
geadresseerde output-poort geplaatst. HL en B worden dan met één verlaagd. 
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Formaat Functie 


OUTD (C) — (HL) 
B B—l 
HL « HL — | 
OUTI 


Output met automatische verhoging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt op de door (C) 
geadresseerde output-poort geplaatst. HL wordt met één verhoogd en B wordt 
met één verlaagd. 


Formaat Functie 
OUTI (C) — (HL) 
B «B — 1 
HL «— HL +4 | 
POP 


Haal twee bytes (een word) van de stapel en plaats deze in het geadresseerde 
registerpaar. 

De inhoud van het byte bovenop de stapel komt in het low-byte van het geadres- 
seerde registerpaar. Vervolgens wordt SP met één verhoogd. De inhoud van het 
byte dat daarna bovenop de stapel staat, komt in het high-byte van het geadres- 
seerde registerpaar. Tot slot wordt SP nog met één verhoogd. 


Formaat Functie 

POP rr rr-low — (SP) 
rr-high «— (SP + 1) 
SP « SP + 2 

POP IX IX-low — (SP) 
IX-high — (SP + I) 
SP «- SP + 2 

POP IY IY-low « (SP) 
TY-high «— (SP + I) 
SP «— SP +2 
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PUSH 


Plaats het geadresseerde registerpaar op de stapel. 

SP wordt met één verlaagd en het high-byte van het geadresseerde registerpaar 
wordt op de stapel geplaatst. SP wordt opnieuw met één verlaagd en het low-byte 
van het geadresseerde registerpaar komt op de stapel. 


Formaat Functie 

PUSH rr (SP — 1) — rr-high 
(SP — 2) « rr-low 
SP «- SP — 2 

PUSH IX (SP — 1) — IX-high 
(SP — 2) « IX-low 
SP «— SP — 2 

PUSH IY (SP — 1) & IY-high 
(SP — 2) « IY-low 
SP «- SP — 2 

RES h 


Dit is een reset op het opgegeven bit uit de geadresseerde operand. 


Formaat Functie 

RES hr bit hin re 0 
RES h‚(HL) bit bin (HL) — 0 
RES h.(ii) bit bin (ii) — 0 
RET 


Een subroutine wordt afgebroken. De PC wordt (net als bij POP) van de stapel 
gehaald en het programma ‘keert terug’. 


Formaat Functie 

RET PC-low «— (SP) 
PC-high — (SP + I) 
SP «- SP +2 
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RET cc 


Indien aan cc wordt voldaan, wordt een subroutine afgebroken. Zie ook bij RET. 


Formaat Functie 

RET cc PC-low «+ (SP) 
PC-high «(SP + I) 
SP «— SP + 2 


* € # mits cc waar* * * 


RETI 


Terugkeer van een interrupt. 

Deze instructie gedraagt zich ongeveer als een gewone RET-instructie, met als 
enige verschil dat de processor nu het einde van een maskeerbare interrupt 
herkent. Het is in verband met eventuele interrupt-nesting zeer verstandig om 
vóór deze instructie een El-instructie te plaatsen! 


Formaat Functie 

RETI PC-low « (SP) 
PC-high «— (SP + 1) 
SP «+ SP + 2 

RETN 


Terugkeer van een niet-maskeerbare interrupt. 

Het gaat wederom om de terugkeer uit een interrupt, alleen wordt nu een speciale 
interrupt-flag hersteld. Dit om aan te geven dat maskeerbare interrupts weer zijn 
toegestaan. Een niet maskeerbare interrupt heeft altijd een hogere prioriteit dan 
een ‘gewone’ interrupt. Een hardware-reset heeft de allerhoogste prioriteit! 


Formaat Functie 

RETN PC-low « (SP) 
PC-high — (SP + 1) 
SP «- SP +2 
IFF1 « IFF2 
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RL 


Roteer de gespecificeerde operand en de carry naar links. 


De inhoud van de carry komt in bit 0, bit 0 gaat naar bit l,…„bit 6 gaat naar bit 7 


en bit 7 komt in de carry te staan. 


Formaat Functie 

RLA carry «— (7...0) « carry 
A 

RL r carry «— (7...0) « carry 
Ld 

RL (HL) carry — (7...0) & carry 
(HL) 

RL (ii) carry — (7...0) « carry 
(ii) 

RLC 


Roteer de gespecificeerde operand naar links. 


Bit 7 gaat naar bit 0, bit 0 gaat naar bit |, bit 6 gaat naar bit 7, bit 7 gaat naar de 


carry. 

Formaat Functie 

RLCA carry …— (7...0) « (7) 
A 

RLC r carry « (7...0) « (7) 
r 

RLC (HL) carry — (7...0) « (7) 
(HL) 

RLC (ii) carry — (7...0) « (7) 
(ii) 
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ARRA ERR. 
ete 


carry 
CRotatie met carry} 


Eb 4 A2 A0 
carry EEE 


(Rotatie) 
16 SAS 2 AB 


(Rekenkundige verschuiving) 


Tessa ris 


Í 


(Logische verschuiving) 


Afb. 4.2. Verschuiven en roteren 


RLD 


Roteer decimaal naar links. 

Het low-nybble van de door (HL) geadresseerde geheugenplaats komt op het 
high-nybble van hetzelfde adres. Het high-nybble van dit adres zit inmiddels in het 
low-nybble van de accumulator, het low-nybble van de accumulator zit dan al in 
het low-nybble van de door (HL) geadresseerde geheugenplaats. 


Formaat Functie 

RLD ii 
(7..4(3..0) (7..4)(3..0) 
A (HL) 
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RR 


Roteer de gespecificeerde operand en de carry naar rechts. 
De inhoud van de carry komt in bit 7, bit 7 gaat naar bit 6, bit 1 gaat naar bit 0, 
bit 0 gaat naar de carry. 


Formaat 
RRA 


RR r 
RR (HL) 


RR (ii) 


RRC 


Functie 

carry — (7...0) — carry 
A 

carry — (7...0) > carry 
r 

carry > (7...0) — carry 
(HL) 

carry — (7...0) > carry 


(ii) 


Roteer de gespecificeerde operand naar rechts.Bit 0 gaat naar bit 7, bit 7 gaat naar 
bit 6, bit 1 gaat naar bit O, bit 0 gaat naar de carry. 


Formaat 
RRCA 


RRC r 
RRC (HL) 


RRC (úí) 


RRD 


Functie 

(0) — (7...0) — carry 
A 

(0) > (7...0) — carry 
r 

(0) — (7...0) — carry 
(HL) 

(0) — (7...0) > carry 
(ii) 


Roteer decimaal naar rechts. 
Het high-nybble van de door (HL) geadresseerde geheugenplaats komt op het 
low-nybble van hetzelfde adres. Het low-nybble van dit adres zit inmiddels in het 
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low-nybble van de accumulator, het low-nybble van de accumulator zit dan al in 
het high-nybble van de door (HL) geadresseerde geheugenplaats. 


Formaat Functie 
RRD > > 
(7.4 (3.0) (7..4(3..0) 
A (HL) 
RST zp 


Herstart op adres zp in de zero page. 

Net als bij een CALL-instructie wordt de PC op de stapel gezet. Het high-byte 
voor de PC wordt 0, en het low-byte bevat de meegegeven waarde. Hierna komt 
het programma in een stukje zero page terecht. 


Formaat Functie 

RST zp (SP — 1) — PC-high 
(SP — 2) « PC-low 
SP «- SP — 2 
PC-high — 0 
PC-low «… zp 

SBC 


Dit is de algemene aftrek-minus-carry-instructie. De gegeven (tweede) operand 
wordt samen met de carry van de eerste operand afgetrokken, waarna het 
resultaat weer in de eerste operand terechtkomt. 


Formaat Functie 

SBC Ar A «— A —r— carry 
SBC Ann A «— A — nn — carry 
SBC A(HL) A «— A-(HL) — carry 
SBC A (ii) A — A — (ii) — carry 
SBC HL rr HL — HL — rr — carry 
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SCF 


Set de carry-flag. 


Formaat Functie 
SCF carry — Ì 
SET 


Dit is een ‘set’ van het opgegeven bit uit de geadresseerde operand. 


Formaat Functie 

SET br bit hin re | 
SET h‚(HL) bit hin (HL) «— | 
SET blif) bit hin (ii) — 1 
SLA 


Schuif de operand logisch naar links. 
Bit 0 gaat naar bit | bit 6 gaat naar bit 7, bit 7 gaat naar de carry. Bit 0 wordt 0. 


Formaat Functie 

SLA r carry « (7...0) — 0 
r 

SLA (HL) carry  (7...0) « 0 
(HL) 

SLA (ii) carry «— (7...0) «— 0 
(úi) 

SLI 


Schuif de operand rekenkundig naar links. 
Bit 0 gaat naar bit 0, bit 0 gaat naar bit | … bit 6 gaat naar bit 7, bit 7 gaat naar de 
carry. 
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Formaat Functie 


SLI r carry «…— (7...0) « (0) 
r 

SLI (HL) carry — (7...0) « (0) 
(HL) 

SLI (ii) carry — (7...0) « (0) 
(i) 

SRA 


Schuif de operand rekenkundig naar rechts. 
Bit 7 gaat naar bit 7, bit 7 gaat naar bit 6, bit 1 gaat naar bit 0, bit 0 gaat naar de 
carry. 


Formaat Functie 

SRA r (7) > (7...0) — carry 
ld 

SRA (HL) (7) > (1...0) > carry 
(HL) 

SRA (ii) (7) > (7...0) > carry 
(ii) 

SRL 


Schuif de operand logisch naar rechts. 
Bit 7 gaat naar bit 6, bit 1 gaat naar bit 0, bit 0 gaat naar de carry. Bit 7 wordt 0. 


Formaat Functie 

SRL r 0 > (7.0) > carry 
r 

SRL (HL) 0 > (7.0) > carry 
(HL) 

SRL (ii) 0 > (7...0) > carry 
ED) 
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SUB 


Dit is een algemene aftrekinstructie. De tweede operand wordt van de eerste 
operand afgetrokken, waarna het resultaat weer in de eerste operand terecht- 
komt. 


Formaat Functie 

SUB r A«-A-r 
SUB nn A A — nn 
SUB (HL) A «— A — (HL) 
SUB (ii) A «— A — (ii) 
XOR 


Dit is een logische XOR-operatie die wordt uitgevoerd op de accumulator en de 
aangegeven operand. Het resultaat wordt weer in de accumulator geplaatst. Let 
ook even op de waarheidstabel. 


Formaat Functie 

XOR r A «A xor.r 
XOR nn A «— Axor. nn 
XOR (HL) A «— A .xor. (HL) 
XOR (if) A «— A .xor. (ii) 


—e=-es 
© 
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5 Getallen en hun representaties 


Er bestaan verschillende manieren om over getallen en aantallen te spreken. U 
kunt op de markt een hand opsteken en de koopman geeft u meteen vijf van die 
super-grote-super-rode paprika's. Twee keer met uw hoofd knikken en de friet- 
bakker pompt een ‘dubbel met’. 

De representatie van getallen zoals wij die kennen, is vrij simpel. We tellen van 0 
toten met 9, daarna schuiven we alles naar links om te kennen te geven dat er nog 
een tiental (een honderdtal, duizendtal enz.) vóór staat. 


Voor de duidelijkheid nog een opmerking, om u straks de draad niet te laten 
verliezen: 

Een binair getal wordt vaak voorafgegaan door een '% ‘steken, dus ®%O1010101 of 
%1010101010101010 zijn binaire getallen. 

Een decimaal getal herkent u aan het ‘# '-teken. # 123, #4567 en # 54321 zijn dus 
decimale getallen. 

Een hexadecimaal getal wordt voorafgegaan door het '$'-teken, waardoor SEF, 
$FEDC en $0101 als hexadecimale getallen zijn bestempeld. 


5.1 Binair rekenen 


Heel eenvoudig, dat gereken, maar een computer begrijpt er decimaal gezien 
absoluut NIETS van. Het willoze apparaat kan alleen maar in termen van 
schakelaartjes denken. Zo’n schakelaar heeft maar twee standen, AAN of UIT, 
‘0’ of “T°! 

Eén zo’n nulletje of eentje heet een bit. 4 bits naast elkaar noemen we een nybble, 8 
bits een byte, 16 bits een word en 32 bits een longword. 

Een bit kan dus maar twee waarden representeren: 0 of 1. En nu komt de grap, 
want net als met ‘ons’ decimale stelsel kunnen we naar links opschuiven. Laten we 
dus ook eens twee bits naast elkaar zetten! Vier mogelijkheden: 00, Ol, 10 en 11. 
De getallen 0 tot en met 3 natuurlijk, maar hoe komen we daar dan aan? 


Het eerste bit geeft de ‘enkel’-tallige waarden. Gezien als een macht van twee 
wordt dit: 0*0 = Oof 1 x 0 = 1. 
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Het tweede bit geeft de tien’-tallige waarden. Wederom gezien als een macht van 
twee: 0 x 2=0of 1 x 2 = 2. 


Zo kunnen we verder denken, totdat we bij acht bits (een byte) komen: 


Bit Maal 
0 l 
I 2 
2 4 
3 8 
4 16 
5) 32 
6 64 
gf 128 


Drie voorbeelden: 


00000000: 


totaal: 


00 0 


totaal: 


macht van 2 


20 
2! 
22 
23 
2 
25 
26 
27 


ED ME MM We ME 
EN 
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01110001: 0x 128 


lx 64 
1. 32 
1% 16 
Ox & 
Ox 4 
Os 2 
1 1 
totaal: 113 


Voor 16-bits waarden is het enige dat u hoeft te doen de tabel te verlengen. Als we 


een 16-bits getal als twee bytes 
byte’ x 256 + ‘low-byte’. Een voorbeeld: 


zien, 


wordt 


het resultaat: ‘high- 


0O101010110101010 — (%01010101 x #256) + % 10101010 


01010101: 0 x 128 
Ex 164 
Os 42 
lx 16 
Ox 8 
bee A 
0 2 
Ee U 


subtotaal: 85 
totaal: 85 x 256 + 


5.2 Hexadecimaal rekenen 


10101010: 


subtotaal: 


1 x 128 
Ox 64 
koe 132 
0x 16 
bt 8 
0x 
Ee 


0x 


_ 0 


170 
170 — 21930 


Het vervelende van het rekenen met binaire getallen is de lengte en de onoverzich- 
telijkheid. Om een getal tussen 0 en 255 in te voeren, moet u acht keer op een toets 
drukken, terwijl de decimale invoer (met nullen aangevuld) slecht drie duwtjes 
vereist. Zeven, acht of negen bits... Van een afstand en/of zonder leesbril is het 


allemaal hetzelfde, dus onoverzichtelijk! 


Decimaal en binair verdragen elkaar NIET, maar hexadecimaal en binair geluk- 
kig WEL! Het hexadecimale stelsel is het 16-tallige stelsel. Binair rekenen gebruikt 
2 waarden: Oen 1. Decimaal rekenen gebruikt 10 waarden: 0, 1, 2, 3,4, 5, 6,7, 8en 
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9, Hexadecimaal rekenen gebruikt er natuurlijk zestien: 0, 1, 2, 3,4, 5,6,7,8,9, A, 
BG DEE. 


U voelt de bui al hangen, want ‘15 + 16 x 15’ is 255. Met andere woorden, aan 
twee hexadecimale digits heeft u al voldoende om een 8-bits waarde te represente- 
ren. Even een verhelderend staatje: 


Decimaal Binair Hexadecimaal 
00 0000 0 
Ol 0001 | 
02 0010 2 
03 0011 3 
04 0100 4 
05 0101 5 
06 0110 6 
07 OL 7 
08 1000 8 
09 1001 9 
10 1010 A 
1 1011 B 
12 1100 G 
13 1101 D 
14 1110 E 
15 II F 


Een hexadecimaal getal kan dus dezelfde waarde bereiken als vier binaire digits. 
Vier binaire digits noemden we een nybble. Het eerste nybble, het low-nybble, is 
dan te zien als de ‘enkele’ waarden. In een macht van 16 wordt dit: 0 x 0 = 0 of 
Ix0O=l..of 15 x 0= 15. 

Het tweede nybble, het high-nybble, is dan te zien als de “tien’-tallige waarden, 
wederom als een macht van zestien: Ox 16=0 of 1 x 16 =16...of 
15 x 16 = 240. 


Zo kunnen we verder denken, totdat we bij acht bits (een byte) komen: 


Nybble Maal 2-macht 
low l 16° 
high 16 16! 
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Drie voorbeelden: 


00: Ox 16 
Ox. 1 

totaal: 0 

FF: 15 x 16 
15 A 

totaal: 255 

1: 7x 16 
Ex ok 

totaal: 113 


Voor 16-bits waarden is wederom het enige dat u hoeft te doen, de tabel te 
verlengen. Of, als we een 16-bits getal als twee bytes zien: het resultaat wordt 
“high-byte’ x 256 + ‘low-byte’. 

Een voorbeeld: 


SSAA — (S55 x #256) + SAA 


55: Ss x 16 AA: 10 x 16 
5 1 10 x 1 
subtotaal: 85 subtotaal: 170 
totaal: 85 x 256 + 170 — 21930 
5,3 ‘Rekenen’ in ASCII 


Een heel ander verhaal is het werken met karakters. Cijfertjes leveren geen 
probleem op, maar de computer moet ook nog iets zichtbaar kunnen maken. Als 
op een gegeven moment een teken op uw beeldscherm staat, kan het zijn dat het 
onze A voorstelt. Een computer rekent absoluut niet in ABC-tjes, dus moeten we 
terug denken, ver terug.… 


Om te beginnen bestaat een ‘A’ uit een aantal puntjes. Als de MSX in de 32 x 24 
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tekst-mode staat, bestaat een karakter uit een 8 x 8-raampje. 8 puntjes in de 
breedte staan voor een lijn-bit-patroon. 8 bits is wederom een heel byte, dus waar 
een pixel ‘aan’ staat, staat een bit op ‘1’. Waar een pixel ‘uit’ staat, staat een bit op 
‘0’. Iedere lijn verbruikt één byte, dus 8 lijnen beslaan 8 bytes. Een voorbeeld: 


oe ans %00100000 32 
EEE ns %01010000 80 
Bad % 10001000 136 
Nd re % 10001000 136 
ER eg % 11111000 248 
Pra % 10001000 136 
AT % 10001000 136 
ETON %00000000 0 


Nu is de computer wel zo slim om u niet al die afzonderlijke puntjes te laten 
plotten. Ergens in het video-RAM bevindt zich een tabel waarin 256 verschillende 
8 x 8 patronen staan (zie appendix). Zo is er ook een bepaald stukje videogeheu- 
gen waar zich 32 x 34 is 768 bytes bevinden. Deze bytes beslaan het beeldscherm. 
Elke waarde in dit stukje van 768 bytes is niet meer dan een wijzer naar die 
karaktertabel met 8 x 8 blokjes. Nu wordt het simpel. Als er bijvoorbeeld een 0 
op het scherm staat, komt het nulde patroon uit de karaktertabel op het beeld. Een 
| heeft het eerste patroon, enz. (Een simpele berekening: tabelposi- 
tie = tabelbegin + 8 x schermwaarde) 


Een waarde staat voor een schermcode. We hebben 256 8-bits waarden en dus 256 
verschillende karakters. U geeft een POKE en op het scherm wordt de representa- 
tie van deze POK E-waarde meteen zichtbaar! 


Een heel ander verhaal krijgt u te horen bij het door de computer afdrukken van 
een teken. In het systeem-ROM (Ook wel BIOS genoemd) zitten een aantal 
handige routines die via een hoofd-ingang (CHPUT) worden aangeroepen. We 
noemen: ‘het scherm wissen’, ‘cursor links-boven’, ‘regel wissen’, ‘cursor naar 
beneden’, ‘een linefeed’, enz. En niet te vergeten. .Het afdrukken van een teken! 
AL deze bewerkingen moeten dus ook worden aangeroepen. Ook hier hebben we 
weer 256 verschillende mogelijkheden. Als we de afdrukroutine met de code 32 
aanroepen, wordt er een spatie op het beeldscherm afgedrukt. De waarde 13 
daarentegen zet de cursor in de meest linkse kolom. Ook zijn er codes voor 
‘HOME’, ‘CLS’, enz. 


61 


Alle ASCII-codes (Want afdrukken door het systeem vindt via dit speciale 
gestandaardiseerde protocol plaats!) hebben een speciale betekenisen ook werken 
zij meestal op een eventueel aangesloten printer. 

Op dit alles komen we in de programmeervoorbeelden nog uitgebreid terug. 
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6 Enkele basistechnieken 


Om u alvast een klein beetje op weg te helpen, volgen nu een aantal simpele 
voorbeelden, geschreven in HERBYMON. Per voorbeeld zullen we kijken wat 
het doet, maar vooral in welke programmeersituaties u zich van dergelijke tech- 
nieken kunt bedienen. 


Zoals het voorbeeld is afgedrukt, kunt u het met het assembleercommando 
invoeren. leder voorbeeld is in subroutineformaat geschreven. Als u vanuit de 
HERBYMON de C-instructie gebruikt, keert de routine dus netjes terug! 


6.1 Relatieve lussen 


; CO0O0 06 10 LD B,$10 
„; COO2 C5 PUSH BC 
„; CO0O3 CD CO 00 CALL $00CO 
.; COO06 C1 POP BC 
„; C007 10 F9 DJNZ @CO02 
.; COO9 CJ RET 
„5 COOA 00 NOP 
.; COOB 00 NOP 
„5 COOC 00 NOP 
.; COOD 00 NOP 
„5 COOE 00 NOP 
„; GOOF 00 NOP 
„; CO10 3E 10 LD A,$10 
.‚ CO12 32 OO EO LD ($E000),A 
„; CO15 CD CO 00 CALL $00C0 
.; CO18 21 00 EO LD HL, $E0O0O 
.; CO1B 35 DEC (HL) 
.; CO1C 20 F7 JR NZ,@CO15 
„5 CO1E C9 RET 
„; CO1F 00 NOP 
.; CO20 3E 08 LD A‚$08 
„.; CO22 32 00 EO LD ($E000),A 
‚5 CO25 3E 10 LD A,$10 
.; CO27 32 O1 EO LD ($E001),A 
.; CO2A CD CO 00 CALL $00CO 

; CO2D 21 O1 EO LD HL,$EOO1 
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CO30 35 DEC (HL) 


.; CO31 20 F7 JR NZ,@CO2A 
‚; CO33 2B DEC HL 

.; CO34 35 DEC (HL) 

.; CO35 20 EE JR NZ,@C025 
‚; CO37 C9 RET 


Heel vaak wilt u een aantal handelingen herhalen. Hiervoor moet u dus een lus 
maken. Een lus kunt u op verschillende manieren ontwerpen. Hieronder vindt u 
de beschrijving van een drietal mogelijkheden. 

Nog een algemene opmerking: de JR-instructies zijn ook te vervangen door 
JP-instructies. Houd er echter rekening mee dat dit uw routines langer maakt. 


De eerste lus is geïndexeerd. Het programma maakt handig gebruik van het 
B-register en de DJNZ-instructie. U kunt de instructie LD B,S.. eenvoudig 
aanpassen om zo tot het gewenste aantal herhalingen te komen (start met C 
C000). 


Het tweede voorbeeld gebruikt een geheugenplaats voor het tellen van de herha- 
lingen. Een groot voordeel van een dergelijke lus is het feit dat u vrij van de 
registers gebruik kunt maken. Pas als u aan het einde van de lus bent gekomen, test 
u op het al dan niet herhalen (start met C C010). 


Het derde lus is een dubbele lus. In dit geval heeft u een binnen-en een buitenlus 
(start met C C020). 


6.2 Logische bewerkingen 


; COO0O0 5F LD E‚A 
„; COO1 E6 00 AND $00 
.; COO3 47 LD B,A 
‚; COO04 7B LD A,E 
.; CO05 E6 FF AND SFF 
.; COO07 4F LD C,A 
.; CO08 7B LD A,E 
‚; COO9 E6 55 AND $55 ' 
.; COOB 57 LD D,A 
„; COOC 7B LD A,E 
.; COOD E6 AA AND S$AA 
‚; COOF SF LD E‚A 
‚; CO10 C9 RET 
‚; CO11 00 NOP 


le) 
eN 


EE NEE RTE A NE A RN ONM RP EE IP 
A 


CO12 
CO13 
CO14 
CO15 
CO16 
GO17 
CO18 
CO19 
CO1A 
CO1B 
CO1C 
CO1D 
CO1E 
CO1F 
C020 
CO21 
C023 
CO24 
C025 
C027 
CO28 
Co29 
CO2B 
CO2C 
CO2D 
CO2F 
CO30 
CO31 
CO32 
CO33 
CO34 
CO35 
CO36 
CO37 
C038 
CO39 
CO3A 
CO3B 
CO3C 
CO3D 
CO3E 
CO3F 
CO40 
CO41 
CO43 
CO44 
CO45 


; CO47 


CO48 


‚ CO49 


CO4B 


00 


55 


00 


FF 


55 


… Ue = … 
ertmremtmiprO»r 


Ee 
Lee 
Eer Sr 


> 
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„5 CO4C 7B LD A,E 


„; CO4D EE AA XOR BAA 
.; CO4F 5F LD E‚A 
.; CO50 C9 RET 


We gaan eens kijken wat het effect is van de drie logische bewerkingen of operaties 
AND, OR en XOR. Met het *-commando plaatst u een waarde in het A-register. 
De routine laat met de logische bewerking een viertal waarden ‘los’ waarna het 
resultaat in de B-, C-‚ D- en E-registers terechtkomt. (Het verkregen resultaat ziet 
u als de routine terugkeert). 


Het eerste voorbeeld demonstreert de OR-instructie (start met C C000). 


Het tweede voorbeeld demonstreert de AND-instructie (start met C C020). 

De AND-instructie wordt ook wel gebruikt om bepaalde bitpatronen te testen. U 
wilt bijvoorbeeld weten of in een bepaalde byte het getal 3 zit. In %00000011, 
% 11000011, %01010111, enz. Als de laatste twee bits allebei op 1 staan, zit er dus 
een drie in het getal verborgen. In zo’n geval test u met AND S03, direct gevolgd 
door CP $03. Nu kunt u aan de hand van de Z-test te weten komen hoe het met die 
3 zat! 


Het derde voorbeeld demonstreert de XOR-instructie (start met C C040). 


6.3 Dat gedoe met die carry 


; CO00 37 SCF 
„; COO1 3F CCF 
„; COO2 ED 5A ADC HL,DE 
.; CO04 C9 RET 
.; COO5 00 NOP 
„; GO06 00 NOP 
„; €007 00 NOP 
.; CO08 37 SCF 
.; COO9 ED 5A ADC HL,DE 
„; COOB C9 RET 
.; COOC 00 NOP 
„; GOOD 00 NOP 
.; COOE 00 NOP 
„; COOF 00 NOP 
.; CO10 37 SCF 
‚; CO11 3F CCF 
‚ CO12 19 ADD HL,DE 


la} 
Leal 


CO13 C9 RET 


„.; CO14 00 NOP 
.; CO15 00 NOP 
.; CO16 00 NOP 
‚ CO17 00 NOP 
.; CO18 37 SCF 
‚ CO19 19 ADD HL,DE 
.; CO1A C9 RET 
; CO1B 00 NOP 
.; CO1C 00 NOP 
‚ CO1D 00 NOP 
„; CO1E 00 NOP 
‚ CO1F 00 NOP 
‚3 CO020 37 SCF 
; CO21 3F GCCF 
„‚; CO22 ED 52 SBC HL,DE 
; CO24 C9 RET 
‚; CO25 00 NOP 
‚; CO26 00 NOP 
‚; CO27 00 NOP 
‚ CO28 37 SCF 
.; CO29 ED 52 SBC HL,DE 
‚; CO2B C9 RET 
‚; CO2C 00 NOP 
„; CO2D 00 NOP 
.; CO2E 00 NOP 
‚ CO2F 00 NOP 


HERBYMON (V1.1) 
SP IY IX HL DE BC A 
‚« 9D17 DE92 F38B BFA3 0007 0300 00 


16-bits rekenen gaat prima met een Z80-microprocessor. Het enige probleem 
vormt de carry. Wanneer moest dat ding nu WEL en wanneer NIET geset zijn? 
Hieronder zes voorbeelden voor de ADC-, ADD- en SBC-instructies. Met het 
*-commando voert u een aantal probeerwaarden in. U roept de subroutines aan 
en na afloop moet u eens goed op de waarde van het HL-registerpaar letten. 


Zes routines, zes startinstructies: C C000, C C008, C C010, C CO18, C C020 en C 
CO28. 


6.4 Rekenen in de praktijk 


1; COO0O0 2A 00 EO LD HL, ($E000) 
°; CO03 ED 5B 02 EO LD DE, ($E002) 
“; CO07 19 ADD HL,DE 
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C008 
COOB 
COOC 
COOD 
COOE 
COOF 
CO10 
CO13 
CO16 
CO17 
CO1A 
CO1B 
CO1C 
CO1D 
COLE 
CO1F 
C020 
CO21 
CO24 
; CO28 
CO2A 
CO2D 
CO2E 
CO2F 
CO 30 
CO33 
CO36 
CO37 
CO3A 


Nt IK ON IE a EE Ek, 
we we we we we we We we We we we we We pe we we ve we We we We we We we we we We we we 


Optellen en aftrekken. .„.Een viertal voorbeelden waarin zowel met 16 bits als met 
8 bits wordt gewerkt. Het optellen demonstreert het A + B—C-principe. Het 


04 


01 
00 


02 


EO 


EO 
EO 


EO 


EO 
02 


EO 


EO 
EO 


EO 


EO 


LD ($E004),HL 
RET 

NOP 

NOP 

NOP 

NOP 

LD HL,$EO01 
LD A, ($E000) 
ADD A, (HL) 
LD ($E002),A 
RET 


NOP 

NOP 

NOP 

NOP 

NOP 

OR A 

LD HL, ($E000) 
LD DE, ($E002) 
SBC HL,DE 

LD ($E004),HL 
RET 

NOP 

NOP 

LD HL,$EOO1 
LD A,‚($E000) 
SUB (HL) 

LD ($E002),A 
RET 


aftrekken gaat volgens de methode A — BC. 


Helaas bestaat er geen instructie SUB rr‚rr. Hierdoor moeten we bij het derde 
voorbeeld eerst de carry clearen. In plaats van SCF/CCF gebruiken we OR A, wat 


precies hetzelfde oplevert: de carry op 0.… 


U start met C C000, C C010, C C020 en C030. Om de gevolgen te bekijken, geeft u 
een memory-display met M E000 E006. Verander ook de E000-E004 waarden 


eens! 
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7 De MSX en de buitenwereld 


7.1 De routines en hun doel 


In dit deel gaan we een aantal invoer- en uitvoertechnieken beschouwen. Invoer- 
technieken in verband met alles dat de computer IN gaat. Uitvoertechnieken in 
verband met alles dat de computer UIT gaat. 

Vooral dit laatste is van belang. Er bestaan eigenlijk geen computerprogramma'’s 
die iets ondernemen zonder dat de programmeur (of de gebruiker) daarvan in 
kennis wordt gesteld. Toegegeven: sommige processen zijn zó geheim dat een 
programmeur wil dat de gebruiker daarvan niet op de hoogte wordt gesteld, maar 
u als software-ontwikkelaar wilt natuurlijk precies weten wat er op welk moment 
staat te gebeuren en of dat allemaal wel correct gebeurt! 

Aan de andere kant moet een computer de te verwerken informatie kunnen 
opnemen, iets dat op verschillende manieren mogelijk is: via het toetsenbord, 
door middel van de joystick, door iets van een tape te laden enz. 


In de volgende hoofdstukken krijgt u een achttal listings voorgeschoteld. Deze 
omvatten de belangrijkste IO-principes; van het doodgewone ‘tekstje printen’ tot 
en met een ingewikkeld ‘cassette operating systeem’. 


7.2 Nog even vooraf 


De zo dadelijk te verwerken listings van subroutines komen in drie delen. Eerst 
krijgt u het gedeelte als een labelassemblerlisting (beter leesbaar en met enige 
structuur); dit is de listing die we zullen bespreken. Ten tweede ziet u een 
geheugendump, die u klakkeloos met HERBYMON kunt invoeren, temeer daar 
er vaak teksten moeten worden overgenomen. Het derde en laatste deel is een 
stukje ‘pure disassembly’. Dit is de code die u in de HERBYMON te voorschijn 
haalt en gaat gebruiken. 

Het startadres van een demonstratieprogramma is heel gemakkelijk te traceren. U 
kijkt in de assemblerlisting naar de Z80-code rond het label INIT, en u zoekt in de 
door u geproduceerde code naar dezelfde serie instructies. 

TIP: Het is ook mogelijk om de code te verplaatsen. U doet dit met de T-optie uit 
de HERBYMON, waarna u niet moet vergeten om de sprongadressen aan te 
passen. 
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8 Tekstje printen 


Dit voorbeeld demonstreert een simpele afdrukroutine die op de twee eerste 
scherm-modes (40*24 en 321*24) van toepassing is. We gaan ervan uit dat er 
ergens in het geheugen een aantal ASCII-codes werden geplaatst waarvan de 
laatste byte een nul is. 
Het is de bedoeling dat u het adres van deze string in het HL-registerpaar plaatst 
en vervolgens naar onze PRINT-subroutine springt. 
De ASCII-codes vindt u in appendix B. In principe kunt u gedocumenteerde 
ASCII-codes gebruiken om de tekst precies daar te plaatsen waar u vindt dat deze 
dient op te dagen 
TIP: gebruik eventueel de BIOS-routine POSIT om de cursor ergens neer te 


zetten. 


10000 ORIGIN ($c000) 

10010 —- 

10020 $00a2 CONSTANT ChPut 
10030 $00ba CONSTANT IscNtce 


:Tekst2 .ch “dit is een simpel voorbeeld van 


‘screen mode 0’ 


10040 == 

10050 CODE 

10060 —- 

10070 :Tekst1 .ch “hallo wereld!" 
10080 ‚by $0a,$Od, 500 
10090 

ascii-uitvoer... 

10100 ‚by $Oa,$Od, OO 
10110 :Tekst3 .ch “het werkt in 
ERK 

10120 .by $0a,$Od,$00 
10130 -- 

10140 :Print 

10150 ld a,(hl) 

10160 or a 

10170 retif z 

10180 call #ChPut 

10190 inc hl 

10200 jep #Print 

10210 -—- 

10220 :Init 

10230 ld hl,#Tekst1 
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en 


‘sereen moc 


10240 call #Print 
10250 ld hl,#Tekst2 
10260 call #Print 
10270 ld hl,#&Tekst3 
10280 call #Print 
10290 :Wacht 

10300 call #IseNte 
10310 jp #wacht 
10420 


10330 ENDCODE 


2 CO000 
‚: COO04 
.: COO08 
ii GOOG 
ss 6010 
zie GOL 
en GONE 
.: CO1C 
‚3 CO20 
.: CO24 
se GO028 
…s CO2C 
,: CO30 
‚: CO34 
‚: CO38 
‚: CO3C 
.: CO40 
.: CO44 

: CO48 


‚5 CO76 
as GOFT 
‚3 CO078 
<5 6079 
‚5 CO7TC 
‚ COT7D 
.; CO80 
.; CO83 
.; CO86 
‚ CO89 
.; CO8C 
;‚ CO8F 
‚5 CO92 

‚ CO95 


LD A, (HL) 
OR A 

RET 2 

CALL $00A2 
INC HL 

JP $CO76 

LD HL,$COOO 
CALL $CO76 
LD HL,$CO10 
CALL $CO76 
LD HL, $CO43 
CALL $CO76 
CALL $00BA 
JP $CO92 


: CO4C 
.s C050 
…: CO64 
.…. CO58 
.… GO09G 
„is €060 
.: CO64 
„: CO68 
‚: CO6C 
s= CO76 
ze GOT4 
EE elo 
‚: CO7C 
„: CO80 
.: CO84 
a HOB 
.: CO8C 
‚: CO90 

: CO94 
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PRINT isde eigenlijke subroutine. U heeft het adres van de string in HL staan en u 
maakt vervolgens een CALL naar deze subroutine. 

Eerst vergelijken we de door HL geadresseerde waarde met 0 (die OR A dient om 
de zero-flag wel of niet te setten). Is de waarde gelijk aan nul dan is de subroutine 
klaar en keren we netjes terug naar het hoofdprogramma. Zo niet dan nemen we 
het karakter mee naar de BIOS-routine CHPUT en het systeem zorgt voor de 
schermuitvoer. Daarna verhogen we HL om zo de volgende waarde uit de string te 
adresseren, waarna we weer naar PRINT springen. 


ISCNTC controleert op CTRL/STOP en springt terug naar BASIC als deze 
toetscombinatie is ingedrukt. 
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9 Invoer via het toetsenbord 


Een voorbeeld van een routine die invoer via het toetsenbord accepteert. U roept 
deze routine aan zonder parameters, waarna de cursor verschijnt. Nu kan de 
gebruiker een ASCII-string met een door u (de programmeur) bepaalde lengte 
invoeren. Deze string wordt zowel op het scherm als op een door de programmeur 
bepaalde geheugenplaats gebufferd. Met Backspace wist u het laatst ingevoerde 
karakter. Ongewenste toetsen worden ‘wegge-beept’. Deze routine is zeer simpel 
te wijzigen qua invoerlengte en invoergedrag. 

Met deze subroutine kunt u nu alle toetsenbordinvoer regelen om deze later op uw 
gemak te bekijken. Pas als de gebruiker op de RETURN-toets drukt, wordt de 
routine afgebroken. 


TIP: wijzig de lengtetest voor geformatteerde invoer eens. Verander de test voor 
ASCII-uitsluiting, bijvoorbeeld alleen numerieke tekens, of juist alleen alfanume- 
rieke tekens. 


10000 ORIGIN ($c000) 
10010 -- 

10020 $006c CONSTANT IniTxt 
10030 $009f CONSTANT ChGet 
10040 $00a2 CONSTANT ChPut 
10050 $00ba CONSTANT IscNtce 
10060 $00c0 CONSTANT Beep 
10070 $0156 CONSTANT KilBuf 
10080 -- 

10090 CODE 

10100 -- 

10110 :Teller .by #00 

10120 :Wijzer .wo $0000 


10130 —- 

10140 CRBEEE OR "oren ten it 
10150 ‚by $0a,$Od, $00 

10160 :Prompt .ch “invoer: ” 

10170 ‚by $00 

10180 :Show ‚by $0a,$Od 

10190 ‚ch “=>” 

10200 ‚by $00 

10210 -- 
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10220 
10230 
10240 
10250 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10529 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
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:Print 


ld a, (hl) 
or a 

retif z 
call #ChPut 
inc hl 

jp #Print 


:SetUp 


ld b,#16 
ld hl,#Regel 
ld (#Wijzer),hl 


:SetUp0 


ld a,#46 

ld (hl)‚a 

ine hl 

djna #SetUp0 
ld a,#0 

ld (#Teller),a 
call #KilBuf 
ld hl,#&Prompt 


jp #Print 
:Delete 

ld a, (#Teller) 

ep #0 

IF nz 

THEN 

dec a 
ld (#Teller),a 
dec hl 
ld hl, (#Wijzer) 
dec hl 
ld (#Wijzer),hl 
ld a,#46 
ld (hl)‚a 
ld a,#5$08 
call #ChPut 
ld a,#$20 
call #ChPut 
ld a,#$08 
call #ChPut 

FI 

ret 

Erbij 

cp #32 

jpif cs,tBeep 

cp #127 

Jpif nc,tBeep 

push af 


ld a, (#Teller) 


10740 cp #16 

10750 IF nz 

10760 THEN 

10770 inc a 

10780 ld (#Teller),a 
10790 ld hl, (#Wijzer) 
10800 pop af 

10810 ld (hl)‚a 

10320 inc hl 

10830 ld (#&Wijzer),hl 
103840 call #ChPut 
10850 ret 

10360 FI 

10870 pop af 

10880 ret 

10890 —- 


10900 :Invoer 


10910 


call #SetUp 


10920 :Invoer0 


10930 call #IseNte 

10940 call #ChGet 

10950 cp #13 

10960 retif z 

10970 cp #8 

10980 ib 2 

10990 THEN 

11000 call #Delete 
11010 ELSE 

11020 call #Erbij 
11030 FI 

11040 jp #Invoer0 

110509 == 

11060 :Init 

11070 call #IniTxt 


11080 :Init0 


11090 call #Invoer 
11100 ld hl,#Show 
11110 call #Print 
11120 ld hl, #Regel 
11130 call #Print 
11140 jp #Init0 
11150 == 


11160 ENDCODE 


„: €000 00 00 00 2E 
‚: COO04 2E 2E 2E 2E 
: CO08 2E 2E 2E 2E 
COOC 2E 2E 2E 2E 


CO10 2E 2E 2E OA 


.: CO14 OD 00 49 4E 


CO18 56 4F 45 52 


‚2 CO1C 3A 00 OA OD 


…… CO020 
„: CO24 
„: CO28 
…. CO2C 
…: CO30 
3 CO34 
.: CO38 

: CO3C 


CO40 


.: CO44 
.: CO48 
…: CO4C 
.: CO50 
‚: CO54 
.: CO58 
‚: CO5C 
.: CO60 
.: CO64 
… CO688 
…£ CO06C 
‚: CO70 

z 6074 


ED AE Ii Dr Da EP ve Ee ee Ti at Bt OE PE Vr AE 
we we we we We we ve wt We we We we Be we We we Ot we We we we we we we we we 


Dn | 
Leal 


C023 
CO24 
C025 
C026 
Co29 
CO2A 
CO2D 
CO2F 
CO32 
CO35 
CO37 
CO38 
CO39 
CO3B 
CO3D 
CO40 
CO43 
CO46 
CO49 
GO4G 
CO4E 
CO51 
CO52 
CO55 
CO56 
CO59 


CO 
CO 


LD A, (HL) 

OR A 

RET 2 

CALL $00A2 
INC HL 

JP $CO23 

LD B,$10 

LD HL, $COO3 
LD ($COO1),HL 
LD A,$2E 

LD (HL),A 
INC HL 

DJNZ @CO35 
LD A,‚$00 

LD ($CO00),A 
CALL $0156 
LD HL,$CO16 
JP $CO23 

LD A,‚($CO00) 
CP $00 

JP Z,$CO6F 
DEC A 

LD ($CO00),A 
DEC HL 

LD HL, ($COO1) 
DEC HL 


…… C078 
» GOTG 
…: CO80 
‚: CO84 
.: CO88 
‚: CO8C 
.: CO90 
.: CO94 
.: CO98 
.: CO9C 
.: COAO 
‚: COA4 
.: COA8 
‚3 COAC 
‚: COBO 
.: COB4 
‚: COB8 
: COBC 


COCO 


“: COC4 


CO5A 22 O1 CO LD ($COO1),HL 


.; CO5SD 3E 2E LD A,$2E 

‚5 COSF 77 LD (HL),A 

„; CO60 3E 08 LD A,‚$08 

.; CO62 CD A2 00 CALL $00A2 
.; CO65 3E 20 LD A,$20 

„> CO67 CD A2 00 CALL $00A2 
„; CO6A 3E 08 LD A,‚$08 

.; CO6C CD A2 00 CALL $00A2 
.; CO6F C9 RET 

.; CO70 FE 20 CP $20 

.; CO72 DA CO 00 JP C,$00CO 
„> C075 FE 7F CP $7F 

.‚ €077 D2 CO 00 JP NC, 800CO 
„; CO7A F5 PUSH AF 

.; CO7B 3A 00 CO LD A,‚($CO00) 
‚5 CO7E FE 10 CP $10 
.; CO80 CA 93 CO JP Z,$CO93 
.; CO83 3C INC A 
.; CO84 32 00 CO LD ($CO00),A 
.; CO87 2A O1 CO LD HL, ($COO1) 
.; COBA F1 POP AF 

„> CO8B 77 LD (HL),A 

; COB8C 23 INC HL 

.; CO8D 22 O1 CO LD ($COO1),HL 


Het enige dat u zelf hoeft te doen, is een CALL-opdracht naar INVOER te geven. 
Eerst doet de invoerroutine nog even een SETUP, waarin de invoerregel wordt 
gewist. De invoer heeft een maximumlengte van 16 tekens. Op het scherm wordt 
de invoerruimte voor de duidelijkheid gevuld met punten. De toetsenbordbuffer 
wordt geleegd en er wordt een invoer-prompt afgedrukt op de plaats waar de 
cursor zich op dat moment bevindt. 

INVOERO test op de CTRL/STOP-combinatie en probeert vervolgens een ka- 
rakter van het toetsenbord te halen. Het karakter dat werd opgehaald, vergelijken 
we met 13 (carriage return) om eventueel de subroutine te onderbreken. 

Geen 13, dus een ander karakter. Misschien wel ASCII-code 8 (backspace)? Zo ja, 
dan naar de DELETE-routine. Zo niet dan naar de ERBIJ-routine. 


TIP: wijzig de stringlengte om wat variatie aan te brengen. De eerste ERBIJ-tests 
zorgen voor de juiste teken-acceptatie. Deze kunt u natuurlijk ook veranderen. 


Als voorbeeld noemen we CP $30 en CP $39 om alleen maar getallen door te laten. 
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CO90 
CO93 
CO94 
CO95 
C098 
CO9B 
COJE 
COAO 
COA1 
COA3 
COA6 
COA9 
COAC 
COAF 
COB2 
COB5 
COB8 
COBB 
COBE 
COC1 
COC4 


B a Ie . md A Tae: . ° 
ed 


Toelichting 


ERBIJ kijkt of het teken is toegestaan. Zo niet dan keren we terug. Zo ja, dan 
controleren we nog even de lengte. Is de string te lang dan keren we terug. Als alles 
in orde is, plaatsen we dit teken even op de stapel om vervolgens de teller en de 
string-pointer te verhogen. Daarna halen we de waarde van de stapel af (OPGE- 


JP $00A2 
POP AF 

RET 

CALL $CO2D 
CALL $OOBA 
CALL $009F 
CP $0D 

RET Z 

CP $08 

JP NZ,$COAC 
CALL $CO49 
JP $COAF 
CALL $CO70 
JP $CO98 
CALL $006C 
CALL $CO95 
LD HL, $CO1E 
CALL $CO23 
LD HL, $COO03 
CALL $CO23 
JP $COB5 


LET!) en plaatsen deze in de string. 


Als de invoerroutine is beëindigd, weet u waar de string zich bevindt. Ook weet u 
de lengte. Het is verder aan uw programma om deze invoer verder te verwerken. 


DELETE kijkt naar de lengte van de invoer. Is deze gelijk aan nul dan valt er niets 
te wissen en keert de routine terug. Is de invoerlengte ongelijk aan nul dan 
verlagen we de teller en de string-pointer, we plaatsen een punt in de string en de 


cursor moet terug naar voren. 
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10 De typemachinesimulatie 


Als u een printer tot uw beschikking heeft, kunt u eens kijken hoe u deze vanuit een 
machinetaalprogramma aanstuurt. Voor het gemak even een directe toets/prin- 
ter-schakeling. Het hangt van uw printer af hoe de codes worden verwerkt. 
Sommige printers wachten met uitvoeren totdat een CR (carriage return) wordt 
gesignaleerd, andere printers duwen alles meteen door de kop op het papier. 
Let vooral op de speciale uitzondering die wordt gemaakt voor een linefeed, en op 
de escape-uitsluiting. U kunt zelf beslissen of u een andere uitzondering wilt 
maken, of misschien wilt u juist wél gebruik maken van alle extra printer- 
mogelijkheden. In dit laatste geval verdient het enige aanbeveling om de handlei- 
ding van uw afdrukker eens netjes uit te spitten. 

TIP: bouw deze routine om naar een ‘string-afdrukker’ en u bent al aardig op weg 
naar een simpele tekstverwerker! Gebruik hiervoor bijvoorbeeld de afdrukrou- 
tine uit hoofdstuk 8. 


10000 ORIGIN ($c000) 

10010 -- 

10020 $006ec CONSTANT IniTxt 
10030 $OO9f CONSTANT ChGet 
10040 $00a2 CONSTANT ChPut 
10050 $00a5 CONSTANT LptOut 
10060 $00c0O CONSTANT Beep 
10070 $0156 CONSTANT KilBuf 
10080 -—- 

10090 $fJae CONSTANT Lin40 
10100 -- 

10110 CODE 

10120 -—- 

10130 :CharOut 

10140 push af 

10150 call #ChPut 

10160 call #LptOut 

10170 pop af 

10180 ret 

10199 == 

10200 :TypeMach 

10210 call #KilBuf 

10220 REPEAT 
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10230 call #ChGet 

10240 call #CharOut 
10250 cp #13 

10260 IF ‚a 

10270 THEN 

10280 ld a,#10 
10290 call #CharOut 
10300 push af 
10310 call #Beep 
10320 pop af 
10330 FI 

10340 cp #27 

10350 UNTIL z 

10360 ret 

10370 == 

10380 :Init 

10390 ld a,#40 

10400 ld (#Lin40),a 

10410 call #IniTxt 

10420 jp #TypeMach 

10430 -- 

10440 ENDCODE 


.: CO00 F5 CD A2 00 

‚6. COO4 GD AD OO BL “aars 
‚: CO08 C9 CD 56 O1 "..V." 
«s GOOG CD IF OO CD "ne 
„a GO20: 00: CO FR OD au 
‚: CO14 C2 21 CO 3E “.‚!.>" 
… GO18 OA CD 00 UO "rr 
„: CO1C F5 CD CO 00 

2 CO20 F3 FE 1BC2 Toer 
„: CO24 OC CO CI ZE “"‚..>” 
‚: CO28 28 32 AE F3 “"(2..” 
‚: CO2C CD 6C 00 C3 “"‚1l..” 


‚: CO30 09 CO 52 45 “‚.RE" 
„; CO000 F5 PUSH AF 
„; GOO1 CD A2 00 CALL $00A2 
„; COO4 CD A5 00 CALL $00A5 
‚; CO007 F1 POP AF 
„; CO08 C9 RET 
; COO9 CD 56 O1 CALL $0156 
.; COOC CD 9F 00 CALL $009F 
.; COOF CD 00 CO CALL $COOO 
; CO12 FE OD CP $0D 


CO14 C2 21 CO JP NZ,$CO21 


… 0017 3E OA LD A‚$0A 

.; CO19 CD 00 CO CALL $COOO 
.; CO1C F5 PUSH AF 

.; CO1D CD CO 00 CALL $00CO 
„; CO20 F1 POP AF 

.; CO21 FE 1B CP $1B 

.; CO23 C2 OC CO JP NZ,$COOC 
.; CO26 C9 RET 

„5 CO27 IE 28 LD A,$28 

.; CO29 32 AE F3 LD ($F3AE),A 
.; CO2C CD 6C 00 CALL $006C 
;‚ CO2F C3 O9 CO JP $COO9 
Toelichting 


Als u een goede MSX-printer bezit, kan er absoluut niets misgaan. Verder hangt 
het van uw eigen fantasie af hoe exotisch u de over te sturen codes wilt hebben. 


TYPEMACH initialiseert de keyboard-buffer en haalt een karakter met behulp 
van de BIOS-routine CHGET. Dit karakter wordt vervolgens meteen uitgevoerd 
met onze CHAROUT-subroutine. We PUSH-en de waarde, sturen het scherm en 
de printer (BIOS-LPTOUT) aan, waarna we de ingevoerde waarde POP-pen. 
Vervolgens kijken we of het om een carriage return (13) gaat, om er meteen nog 
even een linefeed achteraan te jagen (niet voor iedere printer noodzakelijk). Nog 
even een slinger aan de bel en als het om een escape-code ging, keren we terug naar 
ons hoofd-programma. Heel erg simpel allemaal! 


TIP: u kunt escape-codes toestaan om bijvoorbeeld over te gaan naar een andere 
karakterset, of om grafisch te printen. 
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11 Spelletje spelen? 


De joystick is als homecomputer-accessoire niet meer weg te denken. Tenslotte is 
iedere huiscomputer ook een veredelde speelkameraad, vandaar deze joystick- 
routine. Erg handig is het feit dat u altijd meteen over de juiste joystick /cursor/ 
spatie-informatie kunt beschikken. Dit in tegenstelling tot het werken met de 
CHGET-routine, waar het gebruik afhankelijk is van de grootte van de toetsen- 
bordbuffer en/of de status van dat moment. 


TIP: een uitstekende mogelijkheid om uw programma op twee manieren van 
invoer te voorzien. Aan de ene kant de gewone CHGET-invoer en aan de andere 
kant een directe controle. Handig voor wachtlussen en/of onderbrekingen! 


10000 ORIGIN ($c000) 

10010 -—- 

10020 $006c CONSTANT IniTxt 
10030 $00a2 CONSTANT ChPut 
10040 $00ba CONSTANT IscNte 
10050 $00d5 CONSTANT GtStck 
10060 $00d8 CONSTANT GtTrig 


10070 -- 

10080 CODE 

10090 -- 

10100 :Hoog ‚ch “stick omhoog” 
10110 ‚by $0a,$Od, $OO 
10120 :Laag ‚ch “stick omlaag” 
10130 ‚by $0a,$Od, 800 
10140 :Links ‚ch “stick links" 
10150 ‚by $0a,$Od, 500 


10160 :Rechts .ch "stick rechts” 


10170 : ‚by $0a,$Od, 500 
19180 :Vuur ‚ch “XX vuur X#x” 
10190 ‚by $0a,$Od, 500 
10209 == 


10210 :Print 

10220 ld a, (hl) 
10230 or a 

10240 retif z 
10250 call #ChPut 
10260 inc hl 
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10270 
10280 


10290 : 


10300 
10310 
10320 
10330 


10340 


10350 
10360 
10370 
10380 
103390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 


10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 


:Ri 


Fi 


:Jo 


:In 


jp #Print 


ld hl, #&Hoog 
jp #Print 


ld hl, #Laag 
jp #Print 


ld hl,#&Links 
jp #Print 


ght 
ld hl,#&Rechts 
jp #Print 


re 
ld hl, #&Vuur 
jp #Print 


yStick 

call #IscNte 
ld a,#0 

call #GtStck 
La. Da 

cp #1 

callif z,#Up 
ld a,b 

cp #5 

callif z,#Down 
ld a,b 

cp #3 

callif z,t#Left 
ld a,b 

cp #7 

callif z,#Right 
ld a,#0 


call #GtTrig 
cp #SÉÉ 

callif z,#Fire 
jp HJoystick 


it 
call #IniTxt 
jp #HJoystick 


10750 ENDCODE 
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,: COOO0 
‚: COO4 
‚: CO08 
‚: CO0C 
„ 0010 
.: CO14 
ae CO18 
.: CO1C 
…s CO20 
…s CO24 
‚.: CO28 
 C02G 
‚s CO90 
‚: CO34 
‚: CO38 
se 6030 
.: CO40 
„: CO44 
.: CO48 
‚: CO4C 

: CO50 


bri Aen mh Pe We tE eo ER A ° . he) 
we we we we We we ve we We we We we ve we VO we ve we Be oe We we we ve ve ve 


oo 
EN 


CO4A 
CO4B 
CO4C 
CO4D 
CO50 
CO51 


‚ CO54 


CO57 


; COS5A 


CO5D 


; CO60 


C063 
CO66 
CO69 
CO6G 
CO6F 
C072 
C075 
CO77 
CO7A 
CO7B 
CO7D 
C080 
CO81 
Co83 
CO86 


LD A, (HL) 
OR A 


RET 2 

CALL $00A2 
INC HL 

JP $CO4A 

LD HL,$COOO 
JP $CO4A 

LD HL,$COOF 
JP $CO4A 

LD HL,S$CO1E 
JP $CO4A 

LD HL,$CO2C 
JP $CO4A 

LD HL,$CO3B 
JP $CO4A 
CALL $00BA 
LD A,‚$00 
CALL $00D5 
LD B,A 

CP $01 

CALL Z,$CO54 
LD A‚B 

CP $05 

CALL Z,$COS5A 
LD A,B 


.: CO54 
‚: CO58 
.: CO05C 
‚: CO60 
‚3 CO64 
.: CO68 
.: CO6C 

: CO70 
‚: C074 
1 GOTS 
.: CO7C 
.: CO80 
.: CO84 
.: CO88 
.: CO8C 
‚: CO90 
: CO94 
‚% CO98 
‚s CO9C 
.: COAO0 
.: COA4 


C087 FE 03 CP $03 


.; CO89 CC 60 CO CALL Z,$CO60 
.; CO8C 78 LD A‚B 

.; CO8D FE 07 CP $07 

.; CO8F CC 66 CO CALL Z,$CO66 
‚; CO92 3E 00 LD A,‚$00 

.; CO94 CD D8 00 CALL $00D8 
‚; C097 FE FF CP $FF 

.; CO99 CC 6C CO CALL Z,$CO6C 
.s GO9C CI 72 CO JP $CO72 

.; CO9F CD 6C 00 CALL $006C 
.; COA2 C3 72 CO JP $CO72 
Toelichting 


We maken gebruik van de BIOS-routine GTSTCK. Deze kunt u aanroepen met 0 
(keyboard), 1 (joystick A), of 2 (joystick B) in de accumulator. Voor de vuurknop 
gebruiken we BIOS-GTTRIG met identieke waarden in de accumulator. 


De JOYSTICK-routine kijkt naar CTRL/STOP, om vervolgens de joystick- 
waarde uit te lezen. Deze waarde redden we door hem in het B-register te zetten. 
Hierna is het een kwestie van vergelijken en, afhankelijk van de waarde, een 
passende tekst afdrukken (met de reeds bekende print-routine). 

We halen de vuurknopwaarde op (0 = niets / 255 of SFF = vuur) en drukken af 
als er inderdaad wordt ‘geschoten’. 


Het uitlezen van een joystick heeft normaliter alleen maar met het spelen van 
spelletjes te maken. Spelbesturing is vaak erg complex, dus in dergelijke gevallen 
hangt het van de grenzeloze fantasie van de programmeur af of er met de invoer 
ook daadwerkelijk iets wordt gedaan. Het blijft altijd handig om van een test zoals 
in dit voorbeeld gebruik te maken. U simuleert dan een CASE-structuur en dat is 
wel zo praktisch. 
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12 Bitbeschouwingen 


Het geheugen van uw MSX-machine staat in feite boordevol getallen. In bytes (8 
bits) gezien, spreken we over waarden tussen O0 en 255, in words (16 bits) over 
getallen tussen 0 en 65535. Maar nog altijd decimaal! 

Een schrijfwijze die beter aansluit op de flip/flop-situatie in uw MSX-computer is 
de binaire notatie: allemaal nullen en enen. U kunt dan ook veel sneller aflezen hoe 
het is afgelopen met die vreemde bitbewerkingen. 

De bijbehorende subroutine demonstreert hoe u binaire waarden op uw scherm 
krijgt afgedrukt. Dit alles kan op twee manieren en met een binair ‘procentje’ 
ervoor. Een byte-waarde of een word-waarde, u plaatst het getal op een zelfgeko- 
zen adres, u springt naar de juiste routine en voilà! 


TIP: gebruik deze routine zolang uw programma’s zich nog in hun testfase 
bevinden. Ten eerste ziet u óf er wat gebeurt en ten tweede weet u hóe het gebeurt. 


10000 ORIGIN ($c000) 
10010: == 

10020 $00a2 CONSTANT ChPut 
10030 $00d8 CONSTANT GtTrig 


10040 -- 

10050 CODE 

10060 -- 

10070 :Byt „by $00 
10080 :Word ‚wo $0000 
10090 -- 


10100 :Procent 

10110 ld a,#37 
10120 jp #ChPut 
10130 -- 

10140 :NewLin 

10150 ld a,#10 
10160 call #ChPut 
10170 ld a,#13 
10180 jp #ChPut 
10190 —- 

10200 :Binair 

10210 ld (#Byt),a 
10220 ld b,#128 
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10230 
10240 
10250 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 


call #ChPut 
srl b 
UNTIL z 
ret 


:DoByt 


call #Procent 
ld a, (#Byt) 
call #Binair 
jep HNewLin 


:DoWord 


call #Procent 
ld a, (#Word+1) 
call #Binair 
ld a, (#Word) 
call #Binair 
jp #HNewLin 


: Pauze 


ld a,#0 

call #GtTrig 
cp #Sff 

jpif z,#Pauze 
ret 


:Init 


ld a,#0 
ld (#Byt),a 
REPEAT 
call #Pauze 
call #DoByt 
ld a, (#Byt) 
inc a 
ld (#Byt),a 
UNTIL z 
ld a,#0 
ld (#Word),a 
ld (#Word+1),a 
REPEAT 
call #Pauze 
call #DoWord 
ld a, (#Word) 
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10750 
10760 
10770 
10780 
10790 
10800 
10810 


inc a 

ld (#Word),a 
ld a, (#Word+1) 
dec a 

ld (#Word+1),a 


UNTIL z 
ret 


10420 == 
10830 ENDCODE 


: COOO0 
.: COO4 
.: COO08 
.: COOC 
… 6010 
‚: CO14 
‚: CO18 
‚s CO1C 
st €020 
‚: CO24 
‚: CO028 
…s CO2G 
‚: CO30 
‚ CO34 
…: CO38 
« COC 
‚: CO40 
: CO44 


‚5 COO3 
5 G005 
.; COO08 
.; COOA 
‚5 COOD 
; COOF 
5 COT2 
…s G015 
s GOAT 
‚ CO1A 
5 GOLB 
Je COLE 
(6020 
on GO23 
as 1CO25 
; CO28 


CD A2 00 “1 

38 C2 17 8 

C9 CD 03 

3A 00 CO 

12 CO C3 

Co CD 03 

3A 02 CO 

12 CO 3A 

CO CD 12 . 

25 LD A,$25 

A2 00 JP $00A2 

OA LD A,$0A 

A2 00 CALL $00A2 

OD LD A,$0D 

A2 00 JP $00A2 

00 CO LD ($COOO),A 

80 LD B,$80 

00 CO LD A,‚($CO00) 
AND B 

23 CO JP NZ,$CO23 

30 LD A,‚$30 

25 CO JP $CO25 

31 LD A,$31 

A2 00 CALL $00A2 

38 SRL B 


.: CO48 
«:. CO4C 
.: CO50 
‚: CO54 
‚: C058 
‚…: CO5C 
‚… CO60 
‚< CO64 
.: CO68 
.: CO6C 
«5 CO70 
.… CO74 
.: CO78 
‚: CO7C 
.: CO80 
.: CO84 

: CO88 


CO2A C2 17 CO 
CO2D C9 

CO2E CD 03 CO 
CO31 3A 00 CO 
CO34 CD 12 CO 
C037 C3 08 CO 
CO3A CD 03 CO 
CO3D 3A 02 CO 
CO40 CD 12 CO 
CO43 3A O1 CO 
CO46 CD 12 CO 
CO49 C3 08 CO 
CO4C 3E 00 
CO4E CD D8 OO 
CO51 FE FF 
CO53 CA 4C CO 
CO56 C9 

CO57 3E 00 
CO59 32 00 CO 
COSC CD 4C CO 
COSF CD 2E CO 
CO62 3A 00 CO 
CO65 3C 

CO66 32 00 CO 
CO69 C2 5C CO 
CO6C 3E 00 
CO6E 32 O1 CO 
CO71 32 02 CO 
CO74 CD 4C CO 
CO77 CD 3A CO 
COTTA 3A O1 CO 
CO7D 3C 

COTE 32 O1 CO 
CO81 3A 02 CO 
CO84 3D 

C085 32 02 CO 
CO88 C2 74 CO 
COBB C9 


EN RE RR EE ET A KR EN A 
we we we we We we we we we we Ve we we we ve we ve we we we ve we we we We we we we We we ve we We we Ve we ve we 


Toelichting 


JP NZ,$CO17 
RET 

CALL $COO3 
LD A,‚($CO00) 
CALL $CO12 
JP $COO08 
CALL $COO3 
LD A, ($CO02) 
CALL $CO12 
LD A, ($COO1) 
CALL $CO12 
JP $CO08 

LD A,$00 
CALL $00D8 
CP $FF 

JP Z,$CO4C 
RET 


LD A,‚$00 

LD ($COO0),A 
CALL $CO4C 
CALL $CO2E 
LD A,‚($CO00) 
INC A 

LD ($COOO),A 
JP NZ,$CO5C 
LD A,‚$00 

LD ($COO1),A 
LD ($COO2),A 
CALL $CO4C 
CALL $CO3A 
LD A,‚($COO1) 
INC A 

LD ($COO1),A 
LD A,‚($COO2) 
DEC A 

LD ($CO02),A 
JP NZ,$CO74 
RET 


Het wordt nu toch wat minder makkelijk, dus laten we de listing eens puntsgewijs 
van boven naar beneden bekijken. U zult dan zien dat de feitelijke routine niet 


zoveel in huis heeft. 
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PROCENT vertelt de gebruiker door middel van een %-teken dat het om een 
binair getal gaat. 


NEWLIN geeft een linefeed en een carriage return (zie appendix voor exacte 
werking). 


BINAIR redt de af te drukken accumulator. In het B-register wordt 128 
(% 1100000000) geplaatst. Vervolgens gaan we dit B-register als masker voor het af 
te drukken byte gebruiken. Eerst een AND met % 10000000, een gesette zero-flag 
heeft tot gevolg dat we een | afdrukken, anders een 0. Het B-register wordt naar 
rechts geschoven (% 10000000 wordt %01000000..…) en we herhalen de afdruk- 
test. Schuiven, afdrukken enz. Dit alles acht keer, waarna we terugkeren. 


DOBYT drukt een byte af en verplaatst de cursor naar een nieuwe regel (De 
CALL-return wordt verderop meegenomen). 


DOWORD drukt een word af. Eerst het high-byte, dan het low-byte. 


PAUZE kijkt of er op de spatiebalk wordt gedrukt. Is dat het geval dan wacht de 
routine totdat de spatiebalk weer wordt losgelaten. 


INIT drukt ter demonstratie 255 bytes en 255 words af. 


13 Hexadecimale sprongen 


De getalsnotatie die in computerland het meest wordt gebruikt, is zonder twijfel 
de hexadecimale vorm. Niet alleen is deze het best leesbaar (toegegeven, het is even 
wennen), het is ook de meest compacte manier om een getal te representeren. 
Waar een binaire byte-uitvoer acht maal naar de CHPUT zal grijpen, hoeft de 
hexadecimale variant slechts twee keer te scoren. Ziedaar de ruimte- en tijdwinst! 
Net als bij de voorgaande binaire routine roept u ook deze routine op twee 
manieren aan. Een byte-afdruk en een word-afdruk. 


TIP: een prima routine voor een hexadecimale memory-dump! In combinatie met 
een invoermogelijkheid simuleert u de SpeedTyper. 


10000 ORIGIN ($c000) 

1000: == 

10020 $00a2 CONSTANT ChPut 
10030 $00d8 CONSTANT GtTrig 


10040 -—- 

10050 CODE 

10060 -—- 

10070 :Byt ‚by $00 

10080 :Word ‚wo $0000 

10090 -- 

10100 :HexCod ch “0123456789abcdef 
10110 —= 


10120 :String 

10130 ld a,#36 
10140 jp #ChPut 
KOEDD == 

10160 :NewLin 

10170 ld a,#10 
10180 call #ChPut 
10190 ld a,#13 
10200 jp #ChPut 
10216 ——= 

10220 :MakNib 

10230 ld hl, #HexCod 
10240 ld c‚a 
10250 1d b,#0 
10260 add hl,be 
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10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10430 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
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ld a, (hl) 
jep #ChPut 
:MakByt 
push af 
srl a 
srl a 
srl a 
srl a 
call #MakNib 
pop af 
and #15 
jp #MakNib 
:DoByt 
call #String 
ld a, (#Byt) 
call #MakByt 
jp #NewLin 
: DoWord 
call #String 
ld a, (#Word+1) 
call #MakByt 
ld a, (#Word) 
call #MakByt 
Jp HNewLin 
: Pauze 
ld a,#0 
call #&GtTrig 
cp #SfF 
jpif z,#Pauze 
ret 
:Iníit 
ld a, #0 
ld (#Byt),a 
REPEAT 
call #Pauze 
call #DoByt 
ld a, (#Byt) 
inc a 
ld (#Byt),a 
UNTIL z 
ld a,#0 
ld (#Word),a 
ld (#Word+1),a 
REPEAT 
call #Pauze 
call #DoWord 


10780 ld a, (#Word) 


10790 inc a 

10800 ld (#Word),a 
10810 ld a, (#Word+1) 
10820 dec a 

10830 ld (#Word+t1),a 


10840 UNTIL z 
10850 ret 
10860 —- 

10870 ENDCODE 


CO2C 00 F5 CB 3F 
CO030 CB 3F CB 3F if 
CO34 CB 3F CD 22 ? 
CO038 CO F1 E6 OF “* 
CO3C C3 22 CO CD 9 
CO40 13 CO 3A 00 
GO44 CO CD 2D CO = 
CO48 C3 18 CO CD 4 
CO4C 13 CO 3A 02 
‚3 CO13 3E 24 LD A,$24 
; CO15 C3 A2 00 JP $00A2 
; CO18 3E OA LD A‚$0A 
; CO1A CD A2 00 CALL $00A2 
; COID 3E OD LD A‚$0D 
; COIF C3 A2 00 JP $00A2 
.‚ CO22 21 03 CO LD HL,$COO3 
‚ CO25 4F LD C,A 
‚ CO26 06 00 LD B,$00 
‚ CO28 09 ADD HL,BC 
. CO29 7E LD A, (HL) 
.… CO2A C3 A2 00 JP $00A2 
.; CO2D F5 PUSH AF 
.; CO2E CB 3F SRL A 


.: CO50 
.: CO54 


CO58 


‚:- COBC 
…: C060 
‚: CO64 
‚: CO68 
.: CO6C 
„3 €070 
… 0074 
‚: C078 
…s G07G 
‚: CO80 
‚: CO84 
… CO88 
…< COB 
‚: CO90 
‚: CO94 
‚: CO98 
‚: CO9C 
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CO30 CB 3F SRL A 


.; CO32 CB 3F SRL A 

.s CO34 CB IF SRL A 

‚js CO36 CD 22 CO CALL $CO22 
«, CO39 F1 POP AF 

.; CO3A E6 OF AND $OF 

«5 COC 03 22 GO JP $CO22 

.; CO3F CD 13 CO CALL $CO13 
.; CO42 3A 00 CO LD A,‚($CO00) 
.; CO45 CD 2D CO CALL $CO2D 
‚; CO48 C3 18 CO JP $CO18 

‚; CO4B CD 13 CO CALL $CO13 
.; CO4E 3A 02 CO LD A,‚($CO02) 
.; CO51 CD 2D CO CALL $CO2D 
‚5 CO54 3A Ol CO LD A,‚($COO1) 
‚3 CO57 CD 2D CO CALL $CO2D 
.‚; COSA C3 18 CO JP $CO18 

„; CO5D 3E 00 LD A,‚$00 

.; COSF CD D8 00 CALL $00D8 
‚; CO62 FE FF CP $FF 

‚; CO64 CA 5D CO JP Z,$COSD 
‚; CO067 C9 RET 

.; CO68 3E 00 LD A,$00 

.; CO6A 32 00 CO LD ($COOO),A 
.; CO6D CD 5D CO CALL $COSD 
.; CO70 CD 3F CO CALL $CO3F 
“s CO73 3A 00 CO LD A, ($CO00) 
.; CO76 3C INC A 

.; CO77 32 00 CO LD ($COO0),A 
.; CO7A C2 6D CO JP NZ,$CO6D 
.; CO7D 3E 00 LD A,‚$00 

5 COP 32 OL CO LD ($COO1),A 
‚) CO82 32 02 CO LD ($COO02),A 
., CO85 CD 5D CO CALL $CO5D 
.; CO88 CD 4B CO CALL $CO4B 
.; CO8B 3A O1 CO LD A,‚($COO1) 
.; COB8E 3C INC A 

.; CO8F 32 O1 CO LD ($COO1),A 
„5 CO92 3A 02 CO LD A,‚($CO02) 
„; CO95 3D DEC A 

‚.; CO96 32 02 CO LD ($CO02),A 
.; CO99 C2 85 CO JP NZ,$CO85 
.; CO9C CI RET 

Toelichting 


Deze routine is nog iets ingewikkelder dan de vorige, aangezien we ieder byte in 
tweeën moeten splitsen (vier bits leveren een waarde tussen %0000 en % III, 
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tussen SO en SF, of tussen #0 en #15 op)en via een tabel moeten afdrukken. We 
bekijken de listing wederom puntsgewijs. Vooral MAK NIB en MAK BYT verdie- 
nen uw gewaardeerde aandacht. 


STRING vertelt de gebruiker door middel van een S-teken dat hij met een 
hexadecimaal getal te maken heeft. 


NEWLIN geeft een linefeed en een carriage return. 


MAK NIB plaatst het adres van de string HEXCOD in het HL-registerpaar. de 
inhoud van de accumulator (een waarde tussen O en 15) komt in het C-register en 
er komt een nul in het B-register. Vervolgens tellen we de registerparen HL en BC 
bij elkaar op, waarna we de HL-geadresseerde waarde afdrukken. 


MAKBYT splitst het af te drukken byte in tweeën. Eerst het high-nybble. 
Daartoe schuiven we het byte vier maal naar rechts met als gevolg dat de zaak 
verschuift van ‘aaaabbbb’ naar ‘0000aaaa’. Met deze laatste waarde duiken we de 
MAK NIB-routine in. 

Het low-nybble verkrijgen we met een AND-instructie. ‘aaaabbbb’ is na deze 
instructie omgetoverd in ‘0000bbbb'. Ook nu weer naar MAK NIB. 


DOBYT drukt een byte af en verplaatst de cursor naar een nieuwe regel. 


DOWORD drukt een word af. Eerst het high-byte, dan het low-byte. 
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14 Ongewoon gewoon! 


Decimale getallen zien er zo bekend uit! Omdat ‘gewone’ computergebruikers zich 
niet willen pijnigen over het hoe en waarom van hexadecimale getallen, wordt van 
de programmeur verwacht dat hij of zij zich omschakelt. Decimale getallen op een 
computer is zoiets als eieren in een magnetron: het gaat wel, maar niet écht lekker! 
Geen nood, want een beetje programmeur serveert iedereen op maat, zelfs de leek. 
Evenals bij de twee voorgaande gevallen duiken we een subroutine in, maar er 
moet vooraf nog even wat gebeuren! U moet namelijk aangeven hoe ‘breed’ het 
getal gaat worden. 00000, 0000, 000, 00, of 0? Enfin, kijkt u maar naar het 
voorbeeld. 


TIP: als u de werking van deze routine bijna letterlijk omdraait, kunt u in 
combinatie met de invoeroptie ook decimale getallen inlezen. 


10000 ORIGIN ($c000) 

10010 -- 

10020 $00a2 CONSTANT ChPut 
10030 $00d8 CONSTANT GtTrig 


10040 -—- 

10050 CODE 

10060 -- 

10070 :Byt ‚by $00 
10080 :Word ‚wo $0000 
10090 -- 

10100 :DecTab .wo 10000 
10110 ‚wo 1000 
10120 ‚wo 100 
10130 ‚wo 10 
10140 ‚wo 1 
10150 -- 


10160 :Hekje 

10170 ld a,#35 
10180 dep #ChPut 
10190 —- 

10200 :NewLin 

10210 ld a,#10 
10220 call #ChPut 
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10230 ld a,#13 

10240 jp #ChPut 
10250 == 

10260 :Decimaal 

10270 REPEAT 

10230 push af 
10290 ld a, (bc) 
10300 ld e‚a 
10310 inc be 
10320 ld a, (be) 
10330 ld d‚a 
10340 inc be 
10350 ld a,#$ff 
10360 or a 

10370 push be 
10330 REPEAT 
10390 ld b‚,h 
10400 Td, 
10410 sbce hl,de 
10420 inc a 
10430 UNTIL cs 
10440 ld h‚b 
10450 id 1,6 
10460 pop be 
10470 add a, #48 
10480 call #ChPut 
104930 pop af 
10500 dec a 

10510 UNTIL z 

10520 ret 

10530: == 

10540 :DoByt 

10550 call #Hekje 
10560 ld h,#0 

10570 ld a, (#Byt) 
10580 ld 4, 

10590 Id be, #DecTabt4 
10600 ld a, #3 

10610 call #Decimaal 
10620 jep #NewLin 
10630 -—- 

10640 :DoWord 

10650 call #Hekje 
10660 ld a, (#Word+1) 
10670 ld h‚a 

10680 ld a, (#Word) 
10690 Jd Ta 

10700 ld be, #DecTab 
10710 ld a,#5 

10720 call #Decimaal 
10730 jp #NewLin 
10740 -—- 
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10750 :Pauze 


10760 ld a, #0 

10770 call #GtTrig 
10780 cp #Sff 

10790 Jpif z,#&Pauze 
10800 ret 

10810 -—- 

10820 :Init 

10830 ld a,#0 

10840 ld (#Byt),a 
10850 REPEAT 

10860 call #Pauze 
10870 call #DoByt 
10880 ld a, (#Byt) 
10890 inc a 

10900 ld (#Byt),a 
10910 UNTIL z 

10920 ld a, #0 

10930 ld (#Word),a 
10940 ld (#Word+1),a 
10950 REPEAT 

10960 call #Pauze 
10970 call #DoWord 
10930 ld a, (#Word) 
10990 inc a 

11000 ld (#Word),a 
11010 ld a, (#Word+1) 
11020 dec a 

11030 ld (#Word+1),a 
11040 UNTIL z 

11050 ret 

11060 == 


11070 ENDCODE 


„: CO0O 00 00 00 10 


: COO4 27 EB 03 64 “'..d” 


.: CO08 00 OA 00 01 


t 00E 00 SERSOS TRT 


.: CO10 A2 00 3E OA 
.: CO14 CD A2 00 3E 
‚: CO18 OD C3 A2 00 

: CO1C F5 OA 5F 03 


.: CO20 OA 57 03 3E EEn 


‚: CO24 FF B7 C5 44 


.: CO28 


.: CO2C D2 27 CO 60 "…'. 


.: CO30 


‚: CO34 CD A2 00 F1 
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.: CO38 
‚… CO3G 
.: CO40 
‚: CO44 
.: CO48 
.: CO4C 
.: CO6O 
.: CO54 
.: CO58 
‚3 CO5C 
.: CO60 
.: CO64 
: CO68 
CO6C 


C070 


5: CO74 


: CO78 


‚1 CO7C 


C080 


; CO84 


Bn he ot Gho We Taa GR ae vR er VO WIE Wm B ER RODE En te 
we wi we Ue we Ve We vt we ve we ve ve ve we We we ve oe Be ue Ce ve vs ve ve we be we WE we We Ge UL we We wa Ge we ve Ge 


“: Co88 


CO00 
COO1 
CO02 
CO03 
COOS 
CO06 
C007 
CO08 
CO09 
COOA 
COOB 
COOE 
COOF 
CO12 
CO14 
CO17 
CO19 
CO1C 
CO1D 
COLE 
CO1F 
C020 
CO21 
C022 
C023 
C025 
C026 
CO027 
C028 
Co29 
CO2B 
CO2C 
Co2F 
CO30 
CO31 
CO32 
C034 
CO37 
CO38 
CO39 
CO3C 


id 


FF 


52 
27 


30 
A2 


1C 


3E 
00 
00 
00 


CO 


00 


CO 


Se „niGO8G 92-02 CO CD "Zen 
Ran .… CO90 67 CO CD 51 "g..Q" 
Wees „% CO94 CO ZA OL CO ",e..” 
EE ‚: CO98 3C 32 O1 CO "<2..." 
SRB .: CO9C 3A 02 CO ID ":,.=" 
RE „: COAO 92 02 CO C2 "2..." 
een „: COA4 8F CO C9 49 “"..‚.I" 


NOP 
NOP 
NOP 
DJN4 @CO2C 


LD BC, $3E00 
INC HL 

JP $00A2 

LD A,$0A 
CALL $00A2 
LD A,$0D 

JP $00A2 
PUSH AF 

LD A, (BC) 
LD E‚A 


INC A 

JP NC,$CO27 
LD H,‚B 

LD L‚C 

POP BC 

ADD A,‚,$30 
CALL $00A2 
POP AF 

DEC A 

JP NZ,$CO1G 
RET 
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CO3D 
CO40 
CO42 
C045 
CO46 
CO49 
CO4B 
CO4E 
COS51 
CO54 
CO57 
CO58 
CO5B 
CO5C 
COSF 
CO61 
CO64 
CO67 
CO69 
CO6C 
CO6E 
CO71 
CO72 
CO74 
CO77 
COT7A 
; CO7D 
C080 
; CO81 
C084 
; CO087 
C089 
CO8C 
CO8F 
CO92 
CO95 
CO98 
Co9g 
CO9C 
CO9F 
COAO 
COA3 
COA6 


a Ben B ht BE A RE Te nr B Ee et EEE OE ON KE, CE IE OT TE EAN A F8 
we we we ve we we we We we ve we Ue we Be we wr Ge we we We we we We we We we Ve we We we We we We we We we We we we we We we we 


Toelichting 


CALL $COOD 
LD H,$00 

LD A, ($COO0) 
LD L‚,A 

LD BC, $COO7 
LD A,$03 
CALL $CO1C 
JP $CO12 
CALL $COOD 
LD A,‚($CO02) 
LD H‚A 

LD A,‚($COO1) 
LD L,‚A 

LD BC, $CO03 
LD A,$05 
CALL $CO1C 
JP $CO12 

LD A,$00 
CALL $00D8 
CP $FF 

JP Z,8C067 
RET 


LD A,$00 

LD ($CO00),A 
CALL $CO67 
CALL $CO3D 
LD A, ($CO00) 
INC A 

LD ($CO00),A 
JP NZ,$CO77 
LD A,$00 

LD ($COO1),A 
LD ($CO02),A 
CALL $CO67 
CALL $COS1 
LD A, ($COO1) 
INC A 

LD ($COO1),A 
LD A,‚($C002) 
DEC A 

LD ($COO2),A 
JP NZ,$CO8F 
RET 


Decimaal afdrukken werkt, vanuit de computer gezien, nogal ongelukkig zoals u 
inmiddels heeft vernomen. We moeten met machten van tien rekenen, met als 
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gevolg dat we in een minder gecontroleerde lus komen. In dit geval kost het dan 
ook MEER tijd om een GROTER getal af te drukken. Waarschijnlijk is dit voor u 
geen enkel probleem, maar in kritische gevallen is het toch erg onhandig. 

We bekijken de listing weer eens puntsgewijs. DECIMAAL, DOBYT en DO- 
WORD verdienen uw aandacht! Let trouwens ook op het werken met die DEC- 
TAB-word-tabel, een dergelijke adressering heeft u ook nodig als u externe invoer 
wilt omzetten naar een later te verwerken waarde. 


HEKJE vertelt ons door middel van een #-teken dat we met een decimaal getal te 
maken hebben. 


NEWLIN geeft een linefeed en een carriage return. 


DECIMAAL zet een waarde (byte of word) om in een leesbare output. Eerst halen 
we via via een DECT AB-waarde in het DE-registerpaar. Met die OR A zorgen we 
voor een juiste SBC-ingang (Laat die OR A maar eens weg! Ziet u wel.…) Nu 
verminderen we onze waarde net zolang met de inhoud van het DE-registerpaar 
totdat het fout dreigt te gaan. In dat geval hebben we een nog net juiste waarde in 
het BC-registerpaar staan en die bewaren we dan ook voor het volgende DEC- 
TAB-getal. 

Om te zorgen dat we een cijfer op het scherm krijgen, tellen we 48 bij de 
accumulator op (zie appendix B voor het hoe en waarom.) en drukken we die 
waarde af. 

Dit alles opnieuw, totdat de teller op nul staat. Dit heeft als gevolg dat we weer 
terugkeren. 


DOBYT drukt een byte af via het HL-registerpaar en verplaatst de cursor naar 
nieuwe regel. Let op het instellen van de DECIMAAL-routine (Lengte is drie: 
100, 10 en 1). 

DOWORD drukt een word af via het HL-registerpaar en verplaatst de cursor 
naar een nieuwe regel. Let ook hier op het instellen van de DECIMAAL-routine 


(Lengte is vijf: 10000, 1000, 100, 10 en 1). 


PAUZE kijkt of er op de spatiebalk wordt gedrukt. Als dat het geval is, wacht de 
routine totdat de spatiebalk wordt losgelaten. 


INIT drukt ter demonstratie 255 bytes en 255 words af 
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15 Tot de volgende keer 


De meeste programma’s die u op uw computer maakt, wilt u de volgende keer 
weer gebruiken en dan nog het liefst zonder alle poespas van de vorige keer. Een 
nadeel van de computer is in zo’n geval de aan/uit-knop, want als u het apparaat 
uitzet, bent u meteen alle ingevoerde gegevens kwijt. Laat u het ding aanstaan dan 
wordt de stroomrekening als het ware gelanceerd. 

Wat moet u doen? Gewoon alles op een cassettebandje proppen. Saven en loaden 
dus! 

Welnu, dat loaden en saven is een heel gedoe met een MSX-computer. Een echt 
goed cassetteprotocol ontbreekt en daarom moet u dat zelf in elkaar zetten. Denkt 
u even mee, wat hebben we nodig om te kunnen saven? Een bestandsnaam, een 
startadres en een eindadres (aangenomen dat u voor de recorder en het bandje 
zorgt). 

Om te beginnen starten we de band, we plaatsen een vast aantal keren een 
bepaalde waarde op de tape zodat de computer tijdens het loaden het begin van 
een file kan vinden. Vervolgens schrijven we de bestandsnaam weg, hierna (ook al 
weer voor het loaden) het beginadres en het aantal bytes dat ge-saved worden. En 
ten slotte zet u de inhoud van het geheugengebied op de band. 


Het loaden vervolgens: starten, het begin van een file opzoeken (een vast aantal 
keren diezelfde waarde), de bestandsnaam inlezen en vergelijken met de door de 
gebruiker opgegeven bestandsnaam. (Zo nee, doorzoeken. Zo ja, inlezen!) Ver- 
volgens het startadres opzoeken en opslaan, het aantal te loaden bytes inlezen en 
deze ten slotte loaden en in het geheugen zetten. 


TIP: tijdens het loaden is het zeer eenvoudig om vanaf een ander startadres te 
schrijven. Bedenkt u zelf maar hoe! 
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10000 
10010 
10020 
10030 
10040 
10050 
10060 
10070 
10080 
10090 
10100 
10110 
10120 
10130 
10140 
10150 
10160 
10170 
10180 
10190 
10200 
10210 
10220 
10230 
10240 
10250 
10260 
10270 
10280 
102390 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10330 
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10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 


ORIGIN ($c000) 

$00a2 CONSTANT 

$00d8 CONSTANT 

$00e1 CONSTANT 

$00e4 CONSTANT 

$00e7 CONSTANT 

$00ea CONSTANT 

$00ed CONSTANT 

$OOfO CONSTANT 

CODE 

‘Stapel .wo $00 
:Begin .wo $e0 


:Eind .wo $e400 

: Name ‚ch “testje” 
‚by $0a,$Od, OO 

:Deze nl E 
‚by $0a,$0d, $00 


:RecPly .ch “press record and play on tape” 
‚by $0a,$Od, 800 

:RewPly .ch “rewind - press play on tape” 
‚by $0a,$Od, 500 

-IOTxt: „oh “lo-error!” 
‚by $0a,$Od, 500 


ChPut 

GtTrig 
Taplon 
TapIn 

Taplof 
TapOon 
TapOut 
TapOof 


00 
00 


:SavTxt .ch “saving: 


‚by $00 


:ZkTxt ‚ch “searching: 


„by $00 


:VndTxt .ch “found: 


sLdTxt ‚ch “loading...” 
‚by $0a,$0d,$00 


:Ready ‚ch “ready!” 


‚by $0a,$0a,$Od, 800 


retif z 
call #ChPut 
ine hl 

jep #Print 


:Error 


ld sp, (#Stapel) 


call #TapOof 


ld hl,#IOTxt 


jp #Print 
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10520 -—- 

10530 :Won 

10540 push bc 
10550 push de 
10560 push hl 
10570 ld a, #0 
10580 call #TapOon 
10590 jpif ecs,tError 
10600 :Pull 

10610 pop hl 

10620 pop de 

10630 pop be 


10640 ret 
10650 -—— 
10660 :WChr 


10670 push bc 

10680 push de 

10690 push hl 

10700 call #TapOut 
10710 jpif es,tError 
10720 Jep #Pull 

10730 =—- 

10740 :RChr 

10750 push bc 

10760 push de 

10770 push hl 

10780 call #Tapin 
10790 jpif ecs,#Error 
10800 jp #Pull 

10810 =- 

10820 :Ron 

10830 push bc 

10840 push de 

10850 push hl 

10860 call #Taplon 
10870 jpif cs,#Error 
10880 jp #Pull 

10890 -- 

10900 :Save 

10910 ld (#Stapel),sp 
10920 ld hl,#SavTxt 
10930 call #Print 
10940 ld hl, #Name 
10950 call #Print 
10960 call #Won 
10970 ld b,#16 

10980 :Save0 

10990 ld a,#$80 
11000 call #WChr 
11010 djna #Save0 
11020 ld hl, #Name 
11030 ld b,‚#6 
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11040 
11050 
11060 
11070 
11080 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
11160 
11170 
11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11330 
11400 
11410 
11420 
11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 


:Savel 


ld a, (hl) 
call #WChr 
inc hl 

djnz #Savel 
call #TapOof 
ld hl, (#Begin) 
push hl 

ld de, (#Eind) 
ex hl,de 

or a 

sbe hl,de 
push hl 

ld (#Eind),hl 
call #Won 


Ad ah 

call #WChr 
djna #Save2 
ld de, (#Begin) 
ld hl, (#Eind) 


:Save3 


ld a,(de) 

call #WChr 

inc de 

dec hl 

ld a,‚h 

or 1 

jpif na, #Save3 
call #TapOof 
ld hl, #Ready 
jp #Print 


: Load 


ld (#Stapel),sp 


:Load0 


ld hl,#2ZkTxt 
call #Print 

ld hl, #Name 

call #Print 

call #Ron 


:Loadi 


ld b,#16 


:Load2 


call #RChr 

cp #$80 

jpif na,#Loadi 
djna #Load2 
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11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11680 
11690 
11700 
11710 
11720 
11730 
11740 
11750 
11760 
11770 
11780 
11790 
11800 
11810 
11820 
11830 
11840 
11850 
11860 
11870 
11880 
11890 
11900 
11910 
11920 
11930 
11940 
11950 
11960 
11970 
11980 
11990 
12000 
12010 
12020 
12030 
12040 
12050 
12060 
12070 
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ld hl,#Deze 
ld b,#6 


:Load3 


call #&Rchr 

re OE „pe PRS 

ine hl 

djna #Load3 
ld (hl),#0 
call #Taplof 
ld hl,#&VndTxt 
ld a,#$0a 

ld (#Deze+6),a 
call #Print 
ld hl, #Deze 
call #Print 
ld de, Name 
ld hl,#Deze 
ld b,#6 


:Load4 


ld a, (de) 

cp (hl) 

jpif nz,tLoad0 
inc de 

ine hl 

djnz #Load4 

ld hl,#LdTxt 
call #Print 
call #Ron 

ld b,#2 


: Load5 


call #RChr 
Ta Ta 
call #RChr 
ld h‚a 
push hl 
djna #Load5 


pop de 
ld (#Begin),de 
pop hl 


:Load6 


call #RChr 

ld (de),a 

inc de 

dec hl 

ld a,h 

or 1 

jpif nz,#Load6 
call #Taplof 
ld hl, #&Ready 
jp #Print 


: Wacht 


12030 ld a,#0 

12090 call #GtTrig 
12100 cp #$fÍ 

12110 jpif na, Wacht 
12120 ret 

12130: == 

12140 :Init 

12150 ld hl,#&RecPly 
12160 call #Print 
12170 call #Wacht 
12180 call #Save 
12190 ld hl,#&RewPly 
12200 call #Print 
12210 call #Wacht 
12220 call #Load 
12230 jp #Wacht 
12240 -- 

12250 ENDCODE 


C000 00 00 00 EO "....*” .: CO74 3A 20 00 46 “: .F” 
.: CO04 00 E4 54 45 “..TE" ‚: CO78 4F 55 4E 44 “OUND" 
‚: CO08 53 54 4A 45 “STJE" .: CO7C 3A 20 00 4C ": ‚L" 
ve GOOG OA OD OO ZE Var ‚: CO80 4F 41 44 49 “OADI" 
„… GOT 2E 2E 2E 25 “ee ‚: CO84 4E 47 2E 2E “NG, 
„COLA 2E OA OD OO “on se GOGO 2E OA OD DO Pros 
: CO18 50 52 45 53 “PRES" .: COB8C 52 45 41 44 “READ” 
‚: CO1C 53 20 52 45 “S RE“ .: CO90 59 21 OA OA “YI,,” 
.: CO20 43 4F 52 44 “CORD" ‚3 GO OD DO 7E BT "……… 
„: CO24 20 41 4E 44 " AND" <+16098 68 GD AS DO Sraa 
„: CO28 20 50 4C 41 “ PLA” ‚…COIC 43 CI BB CO Hea 
„: CO2C 59 20 4F 4E “Y ON" ‚: COAO ED 7B 00 CO ".{.." 
„: CO30 20 54 41 50 “ TAP" 4 GOAS CD PO O0 ZL "ak 
„: CO34 45 OA OD 00 "E‚..” ‚3 COA8 56 CO C3 96 “"V..." 
.: CO38 52 45 57 49 "“REWI" ‚: COAC CO C5 DS E5 “".‚...*” 
‚: CO3C 4E 44 20 2D “ND -" .: COBO 3E 00 CD EA ">..." 
.: CO40 20 50 52 45 “ PRE" .: COB4 00 DA AO CO ". 4 
‚: CO44 53 53 20 50 “SS P” .: COB8 El D1 C1 C9 
‚: CO48 4C 41 59 20 “LAY * .: COBC C5 D5 E5 CD 
„: CO4C 4F 4E 20 54 “ON T" .: COCO ED 00 DA AO 
„: COSO 41 50 45 OA "APE." „: COC4 CO C3 B8 CO 
‚: CO54 OD 00 49 4F “..I0" ‚: COC8 C5 D5 ES CD 
: CO58 2D 45 52 52 “-ERR” .: COCC E4 00 DA AO 
„: COS5C 4F 52 21 OA “OR!." „.: CODO CO C3 B8 CO 
.: CO60 OD 00 53 41 “..SA" ‚: COD4 C5 D5 E5 CD 
„: CO64 56 49 4E 47 "“VING" „: COD8 E1 OO DA AO 
‚: CO68 3A 20 00 53 “": .S" …: CODC CO C3 B8 CO "...." 
‚: CO6C 45 41 52 43 "EARC" .: COEO ED 73 00 CO “‚s.,” 
: CO70 48 49 4E 47 “HING" ‚: COE4 21 62 CO CD “!b.,*” 
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00 


CO 


. 
.…_ 


LD A, (HL) 
OR A 

RET 2 

CALL $00A2 
INC HL 

JP $CO96 

LD SP, ($COO0) 
CALL $00FO 
LD HL, $CO56 
JP $CO96 
PUSH BC 
PUSH DE 
PUSH HL 

LD A,‚$00 
CALL $00EA 


„s €166 
et C170 
rn OLS 
…. C178 
.* G170 
‚s C180 
‚: C184 
‚: C188 
4 GBG 
.: C190 
sE IGTSA 
ie 1CtG8 
‚:, C19C 
s GEAG 
oi 1CTA4 
‚… C1A8 
…5 GAG 
.: C1BO 
‚3 C1B4 
‚,: C1B8 
‚,< C1BC 
‚s C1CO 
se CHC 
…s C1G9 
8 GGG 
…% CDO 


C1D4 


ge C1D8 


C1DC 


. © C1EO 
«= GIEA 
‚5 C1E8 
: C1EC 


COB5 
COB8 
COB9 
COBA 
COBB 
COBC 
COBD 
COBE 
COBF 
COC2 
COC5 
C0C8 
COC9 
COCA 
COCB 
COCE 
COD1 
COD4 
COD5 
COD6 
COD7 
CODA 
CODD 
COEO 
COE4 


; COE7 


COEA 


; COED 


COFO 
COF3 
COFS5 


‚ COF7 


COFA 


.; COFC 


Bm Ben EE et He de oer nn We sr Her te Al AE tl it ET rm a hi Ik NE De EA IRT WEIDE gt He 
we we we we we vt we Ut we we we we Ve we We we We we We we ve we We we Ut we we we we we We we Vr we We we en we vr ve we we we we we we we we we we we 


COFF 
C101 
C102 
C105 
C106 
C108 
C10B 
C10E 
C10F 
C113 
C114 
C115 
C117 
C118 
C11B 
C11E 
C120 


AO 


CO 


CO 
lee) 


C0 


CO 


JP C,$COAO 
POP HL 


CALL $OOED 
JP C,‚,$COAO 
JP $COB8 
PUSH BC 
PUSH DE 
PUSH HL 
CALL $00E4 
JP C,‚,$COAO 
JP $COB8 
PUSH BC 
PUSH DE 
PUSH HL 
CALL $00E1 
JP C,‚,$COAO 
JP $COB8 

LD ($CO00),SP 
LD HL,$CO62 
CALL $CO96 
LD HL, $CO0O6 
CALL $CO96 
CALL $COAD 
LD B,$10 

LD A,‚$80 
CALL $COBC 
DJNZ @COF5 
LD HL, $COO6 
LD B,$06 

LD A, (HL) 
CALL $COBG 
INC HL 

DJNZ @C101 
CALL $00FO 
LD HL, ($CO02) 
PUSH HL 

LD DE, ($CO04) 
EX DE, HL 

OR A 

SBC HL,DE 
PUSH HL 

LD ($COO4), HL 
CALL $COAD 
LD B,$02 
POP HL 


C121 7D LD A‚L 


„… C122 CD BC CO CALL $COBC 
; C125 7C LD A,H 
.… C126 CD BC CO CALL $COBC 
‚ C129 10 F5 DJNZ @C120 
‚… C12B ED SB 02 CO LD DE, ($CO02) 
‚ C12F 2A 04 CO LD HL, ($COO4) 
en Gide LA LD A, (DE) 
; C133 CD BC CO CALL $COBC 
.; C136 13 INC DE 
‚5 C137 2B DEC HL 
.; C138 7C LD A,H 
.; C139 B5 OR L 
5 CISA C2:32 G1 JP NZ,$C132 
.; C13D CD FO 00 CALL $00FO 
.; C140 21 8C CO LD HL, $CO8C 
‚… C143 C3 96 CO JP $CO96 
.; C146 ED 73 00 CO LD ($CO00),SP 
.; C14A 21 6B CO LD HL,$CO6B 
.‚ C14D CD 96 CO CALL $CO96 
‚ C150 21 06 CO LD HL, $COO06 
‚‚ C153 CD 96 CO CALL $CO96 
‚; C156 CD D4 CO CALL $COD4 
‚; C159 06 10 LD B,$10 
.; C15B CD C8 CO CALL $COC8 
‚; C15E FE 80 CP $80 
.‚ C160 C2 59 C1 JP NZ2,$C159 
‚; C163 10 F6 DJNZ @C15B 
.; C165 21 OF CO LD HL, $COOF 
.; C168 06 06 LD B,$06 
.; C16A CD C8 CO CALL $COC8 
‚5 G1BD TT LD (HL),A 
‚5 C16E 23 INC HL 
‚> Gi6E 10 F9 DJNZ @C16A 
.; C171 36 00 LD (HL),$00 
‚; C173 CD E7 00 CALL $00E7 
„5 C176 21 77 CO LD HL,$CO77 
‚3 C179 3E OA LD A,$0A 
„s G17B 392 15 CO LD ($CO15),A 
‚; C17E CD 96 CO CALL $CO96 
‚; C181 21 OF CO LD HL, $COOF 
.; C184 CD 96 CO CALL $CO96 
.; C187 11 06 CO LD DE, $COO6 
.; C18A 21 OF CO LD HL,$COOF 
.; C18D 06 06 LD B,$06 
‚‚ C18F 1A LD A, (DE) 
.; C190 BE CP (HL) 
.; C191 C2 4A C1 JP NZ,$C14A 
.; C194 13 INC DE 
‚3 C195 23 INC HL 
‚ C196 10 F7 DJNZ @C18F 
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C198 21 7F CO LD HL,$CO7F 


‚ C19B CD 96 CO CALL $CO96 
.; C19E CD D4 CO CALL $COD4 
.; CIA1 06 02 LD B, $02 
‚5 C1A3 CD C8 CO CALL $COC8 
.; C1A6 6F LD L,‚A 
‚3 C1A7 CD C8 CO CALL $COC8 
‚, C1AA 67 LD H‚A 

‚ C1AB E5 PUSH HL 

» CIAC 10 F5 DJNZ @C1A3 
‚; CIAE D1 POP DE 

; CIAF ED 53 02 CO LD ($CO02),DE 
5 C1B3 El POP HL 

; C1B4 CD C8 CO CALL $COCB 
<5 CIB7 12 LD (DE),A 

‚ C1B8 13 INC DE 
ss GIB9 2B DEC HL 

‚ C1BA 7C LD A‚H 
.; C1BB B5 OR L 

; C1BC C2 B4 C1 JP NZ,$C1B4 
.; C1BF CD E7 00 CALL $00E7 

; C1C2 21 8C CO LD HL, $CO8G 
.‚… C1C5 C3 96 CO JP $CO96 

; C1C8 3E 00 LD A,‚$00 
.; C1CA CD D8 00 CALL $00D8 

; CICD FE FF CP SFF 
„; CICF C2 C8 C1 JP NZ,$C1C8 

‚ C1iD2 C9 RET 
‚s C1D3 21 18 CO LD HL,$CO18 
.; C1D6 CD 96 CO CALL $CO96 
‚3 C1D9 CD C8 C1 CALL $C1C8 
‚3 C1IDC CD EO CO CALL $COEO 
25 GIDE 21 38 CO LD HL,$CO38 
‚; CIE2 CD 96 CO CALL $CO96 
.; CIES CD C8 C1 CALL $C1C8 
.; C1E8 CD 46 C1 CALL $C146 

; C1IEB C3 C8 C1 JP $C1C8 
Toelichting 


Het werken met de cassetterecorder houdt veel meer in dan het starten van de 
motor. Denkt u maar eens aan al die meldingen, gaat het goed, fout of goed fout? 
Er zijn van die mensen die onderscheid kunnen maken tussen de diverse bliep- 
bliep-geluiden. Een handige eigenschap, maar het is natuurlijk veel handiger als u 
weet wat er precies met het bandje gebeurt. Het zou vervelend zijn als u ‘ZZ-Top’ 
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in de recorder plaatste, in de waan dat u een hardcopy-routine probeerde binnen 
te halen… 

Voor onze tape-routines denken we aan slimme terugkoppelingen en een eigen 
opslagmethode. In de listing ziet u al diverse systeemboodschappen en we gaan ze 
allemaal serieus gebruiken. 


Cassetteroutines op een MSX-computer zijn niet bepaald eenvoudig te noemen, 
maar als u uiteindelijk over een geolied systeem beschikt, is fouten maken verder 
onmogelijk. We gaan het weer label voor label bekijken. (Houdt u de BIOS- 
appendix er even bij, dank u!) 


PRINT is u inmiddels welbekend. 


ERROR wordt aangeroepen als er een I/O-error werd gesignaleerd. Het kan om 
een CTRL/STOP-combinatie gaan, maar ook is het mogelijk dat de cassetterecor- 
der ‘hangt’. We halen (om een juiste terugkeer te garanderen) de oorspronkelijke 
stapelwijzer voor de dag en we keren met een error-melding weer terug in ons 
hoofdprogramma. 

WON zet de belangrijkste registerparen op de stapel. We plaatsen een nul in de 
accumulator om een korte header te garanderen en we duiken BIOS-TAPOON 
in. Als er een error mocht optreden, verwerken we deze. Het ontbreken van een 
error heeft tot gevolg dat we de registerparen weer van de stapel halen om 
vervolgens terug te keren. 


WCHR schrijft een byte naar de cassette via de BIOS-TAPOUT, en houdt 
rekening met een eventueel opgetreden error (Met stapelbezoek). 


RCHR leest een byte vanaf de cassette via de BIOS-TAPIN. Ook hier denken we 
weer om die error (dus met eventueel stapelbezoek). 


RON start de cassettemotor en garandeert een aanloopje richting header via de 
BIOS-TAPION. Opgelet voor die error, ook hier wederom met stapelbezoek. 


SAVE zet om te beginnen de stack pointer opzij voor de eventueel aan te roepen 
error-routine. Vervolgens drukken we (gebruikersvriendelijk als altijd) een bood- 
schap af. 

De motor wordt gestart. Eerst zetten we 16 (deze waarde kunt u veranderen, maar 
dan ook bij de LOAD-routine!) maal dezelfde waarde (nooit $00 of SFF!) op de 
band, om later het begin van een programma te herkennen. 
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Nu de bestandsnaam (lengte 6 tekens) naar de cassetteband. Hierna zetten we de 
motor voor de zekerheid even uit (kritiek punt bij het weer binnenhalen van een 
file!) en we berekenen het begin-adres en het aantal te plaatsen bytes. Deze 
waarden gaan met een inmiddels weer gestarte motor naar de tape. 

Eenmaal alle administratie achter de rug? Dan gaat het eigenlijke geheugengebied 
naar de band, waarna we de boel afsluiten met een READY-melding. 


LOAD zet eveneens de stapelwijzer apart. Nu drukken we de gezochte bestands- 
naam af waarna we op zoek gaan. 

Motor aangezet, vervolgens op jacht naar die zestien speciale waarden...Een 
afwijkingen we beginnen weer opnieuw! Klopt het patroon daarentegen dan moét 
er een bestandsnaam volgen. 

We hebben dus iets gevonden, we kijken wat het is, we maken melding en we 
vergelijken. Als het patroon opnieuw afwijkt, springen we weer terug. Klopt het 
dan beginnen we met het werkelijke loaden. 

De save-routine heeft twee waarden op de band gezet: het startadres en de 
hoeveelheid binnen te loaden materiaal. We lezen beide waarden in. (Op dit 
moment kunt u het startadres vervangen door een nieuw startadres, maar opge- 
past!) 

Het hart van de routine is eindelijk bereikt. Nu begint het feitelijke loaden: een 
waarde halen, schrijven, nog eentje enz. tot het einde van het bestand is bereikt. 
Hierna meldt de computer dit aan de gebruiker door middel van een READY- 
boodschap. 


De routines: 


WACHT is een oude bekende. 


INIT verzorgt ook een stukje tape-OS met behulp van een tweetal mededelingen, 
en springt naar de save- en load-routines. 


TIP: een verify-routine lijkt verschrikkelijk veel op de load-routine. Alleen moet u 


nu vergelijken in plaats van schrijven. Op het moment dat een waarde afwijkt, 
springt u naar een speciale VERIFY ERROR-routine. 
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Nog even dit 


Met de acht omschreven routines kunt u nu iedere willekeurige invoer en/of 
uitvoer controleren. Het spreekt voor zich dat er nog iets dient te gebeuren met al 
die data. Misschien iets in de richting van tekstverwerken, grafisch printen, of u 
zoekt het in de recreatieve sfeer? Het maakt allemaal niet uit, als alle gebruikte 
subroutines maar werken, want daar draait het immers om. 


Het kan intussen geen kwaad om de routines in te typen en uit te testen. Als u een 
aantal routines tegelijk wilt gebruiken, kunt u ze met de A-instructie van HERBY- 
MON op een ander adres assembleren, u kunt ze verplaatsen met de T-instructie, 
of binnen loaden op een nieuw adres met de L-instructie. 
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16 MSX à la carte.… 


In de volgende hoofdstukken gaan we een aantal MSX-mogelijkheden eens op 
een alternatieve manier bekijken. Videomogelijkheden wel te verstaan! 


16.1 Achter de schermen van een MSX-computer 


Zoals u weet, heeft een MSX-computer (MSX 1) vier verschillende screen modes 
(schermconfiguraties: de mogelijkheden van een specifiek videoscherm) die alle 
vier over specifieke eigenschappen beschikken. 


e De 40 x 24-mode (0) is eigenlijk alleen geschikt voor brede tekst-editing. 

e De 32 x U4-tekst-mode (1) is een smallere versie van de eerste, maar ook sprites 
zijn nu toegestaan. 

e De hires mode (2) werkt nogal bedriegelijk. We beschikken namelijk niet over 
een echt hires-scherm maar meer over een drietal programmeerbare karakter- 
sets. Dit biedt echter legio mogelijkheden voor onder andere flitsende spelpro- 
grammering. 

e De multi color mode (3) ten slotte lijkt een zeer ingewikkelde toestand, maar 
ook hierin kunnen we in machinetaal leuke grappen uithalen. 


Het toverwoord sprites is reeds gevallen. Wat zijn sprites? Sprites zijn speciale, 
onafhankelijk te manipuleren stukjes scherm...Met andere woorden: handige 
poppetjes. 

De MSX voorziet in maar liefst 32 van dergelijke karakter-achtige wezens die, 
onafhankelijk van wat dan ook, overal op het scherm te voorschijn zijn te toveren. 
Zonder veel moeilijkheden heeft u nu een mogelijkheid gekregen tot verfraaiing 
van al uw programma’s. Een spectaculaire ‘titelpagina’, tijdaanduiding, invaders 
enz. Ook op deze sprites komen we nog terug. 
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16.2 De videochip 


De videochip of VDP-processor is een aparte processor die een speciaal stuk 
programmeerbaar video-RAM beheerst. Deze processor beschikt over een spe- 
ciaal statusregister en acht werkregisters (zie appendix G). Het VDP-statusregis- 
ter informeert u over de toestand op dat moment. De acht werkregisters zijn alle te 
manipuleren met behulp van een speciale BIOS-routine, WRTVDP geheten. Een 
klein probleem: u kunt deze VDP-registers alleen maar beschrijven (write only). 
Gelukkig zijn er in het speciale BIOS-werkgebied nog een aantal schaduwregisters 
aanwezig: RGOSAV, RGISAV en RG7SAV. 


Nu moet u ook nog met het videogeheugen (16K groot) kunnen communiceren. 
Daarvoor zijn er een RDVRM- of ‘lees videogeheugen’'-commando en een 
WRTVRM- of ‘schrijf videogeheugen’-commando aanwezig. In appendix G leest 
u hoe u deze routines op de juiste wijze aanspreekt. 


Dit drietal (WRTVDP, RDVRM, WRTVRM) is in principe het enige pakket 
routines dat u nodig hebt om de hele videochip te besturen, ware het niet dat het 
MSX-systeem nog een aantal extra routines in huis heeft. Het is niet per se 
noodzakelijk om van deze routines gebruikt te maken, maar ze zitten toch al in het 
BIOS verwerkt. Dus waarom dan ook niet? 

Een paar voorbeelden van deze routines: DISSCR om het scherm uit te zetten, 
ENASCR zet het scherm weer aan, FILVRM vult een stukvideogeheugen met een 
door u bepaalde waarde, CLRSPR wist alle sprites enz. 

Alle routines worden wederom in de appendix besproken. 


16.3 Wat gaan we doen? 


We gaan de vijf bovenstaande principes behandelen maar zoals gezegd op een 
enigszins afwijkende wijze. Afwijkend van wat? Afwijkend van de MSX-systeem- 
principes. 

We werken tenslotte toch al in machinetaal en in machinetaal hoeft u zich niet aan 
de algemene richtlijnen te houden. Sterker nog, U bepaalt zelf wat de algemene 
richtlijnen zullen worden. In machinetaal kunt u het BASIC maar het beste even 
vergeten en dat geldt dus eveneens voor elk vastpinnend BASIC-protocol. 


Een voorbeeld. BASIC beschouwt de hires mode als bitmap, wij beschouwen de 
hires mode als drie karaktersets. U krijgt in hoofdstuk 19 een treffende illustratie. 
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17 Tekst 40 x 24 


In de 40 x 24-tekst-mode (zie afb. 17.1) neemt de schermtabel 960 ( = 40 x 24) 
bytes in beslag. Het scherm bestaat uit een rooster van 40 x 24 karakters. Dit 
rooster begint in het videogeheugen op geheugenlocatie $0000. 


LALLALLAAL11111122222222 


0123456789ABCDEFO12345678IABCDEFO1234567 $0866 
ETTEN PECEERDEELELE U EEELEERLENE ETE 
EEn nn 
$0808 rr: 
sores 
UREN es 
$1009 


Afb. 17.1. Screen mode 0 


ledere waarde (0-255) in dit stukje videogeheugen wijst naar een 6 x 8 pixel- 
patroon uit de karakterpatroontabel die begint op $0800. 
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De kleuren worden in het zevende VDP-register geplaatst. Sprites zijn helaas niet 
toegestaan. 


17.1 Scrollen 


10010 ORIGIN ($c000) 
10020 -- 

10030 $004a CONSTANT RdVrm 

10040 $004d CONSTANT WrtVrm 
10050 $0056 CONSTANT FilVrm 
10060 $00ba CONSTANT IscNtce 
10070 $00d5 CONSTANT GtStck 


10080 -—- 

10090 CODE 

10100 -- 

10110 :Teller .by $00 
10120 :Read „wo $0000 
10130 :Write ‚wo $0000 
10140 -- 

10150 :VPeek 

10160 di 

10170 call #RdVrm 
10180 ei 

10190 ret 

10200 == 

10210 :VPoke 

10220 di 

10230 call #WrtVrm 
10240 ei 

10250 ret 

10260 -- 

10270 :VFill 

10280 di 

10290 call #FilVrm 
10300 ei 

10310 ret 

10320 -- 


10330 :ScrolUp 

10340 ld a,#23 

10350 ld (#Teller),a 
10360 ld hl, #$0000 
10370 ld (#Write),hl 
10380 ld hl,#$0028 
10390 ld (#Read),hl 
10400 :Up0 

10410 ld b,#40 

10420 :Upl 

10430 ld hl, (#Read) 
10440 call #Vpeek 
10450 ince hl 
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10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10890 
10900 
10910 
10920 
10930 
10940 
10950 
10960 
10970 


ld (#Read),hl 
ld hl, (#Write) 
call #Vpoke 
inc hl 

ld (#Write),hl 
djnz #&Upi 

ld hl,#&Teller 
dec (hl) 

jpif na, tUp0 
ld a,#$20 

ld be, #$0028 
ld hl,#$0398 
call #VFill 
ret 


:ScrolDown 


ld a,#23 

ld (#Teller),a 
ld hl,#$03bf 
ld (#Write),hl 
ld hl,#$0397 
ld (#Read),hl 


: Down 


id b,#40 


:Down1 


:I 


ld hl, (#Read) 
call #Vpeek 
dec hl 

ld (#Read),hl 
ld hl, (#Write) 
call #Vpoke 
dec hl 

ld (#Write),hl 
djna #Down1 

ld hl,#&Teller 
dec (hl) 

jpif na, #Down0 
ld a,#$20 

ld bc, #$0028 
ld hl,#$0000 
call #VFill 
ret 


nit 
call #IseNte 
ld a, #0 
call #GtStck 
cp #1 
IF az 
THEN 
call #SerolDown 
ELSE 
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10980 

10990 

11000 

11010 

11020 FI 

11030 jp #Init 
11040 —— 

11050 ENDCODE 

.: CO00 00 00 00 
„: CO04 00 F3 CD 
„‚: CO08 00 FB C9 
‚: COOC CD 4D 00 


.: CO10 C9 F3 CD 
.: CO14 00 FB C9 
„: CO18 17 32 00 
‚: CO1C 21 00 00 
.: CO20 03 CO 21 
.: CO24 OO 22 O1 
‚: CO28 06 28 2A 
.: CO2C CO CD 05 
‚: CO30 23 22 O1 
„: CO34 2A 03 CO 

: CO38 OB CO 23 
‚: CO3C 03 CO 10 
„: CO40 21 00 CO 
.: CO44 C2 28 CO 
.: CO48 20 O1 28 
„: CO4C 21 98 03 
.: CO50 11 CO 3E 
.: GO54 32 OO CO 


.; CO05 F3 
.; CO06 CD 4A 00 
„;‚ CO09 FB 
‚; COOA C9 

.; COOB F3 
„; COOC CD 4D 00 
‚; COOF FB 
.; CO10 C9 
„…, CO11 F3 

‚ CO12 CD 56 OO 
‚ CO15 FB 
.; CO16 C9 

s CO17 3E 17 


cp #5 
IF z THEN 


FI 


call #ScrolUp 


DI 

CALL $004A 
EI 

RET 

DI 

CALL $004D 
EI 


DI 

CALL $0056 
EI 

RET 

LD A,$17 


.: CO58 
.: COS5C 
: CO60 


CO64 


…. CO068 
Ker je 
„ss GO7O 
…: CO74 
‚6978 
“3 6076 
.: CO80 
‚: CO84 
.: CO88 
‚3 CO08C 
.: CO90 
.: CO94 
.: CO98 
.: CO9C 
.: COAO0 
.: COA4 

: COA8 


GE (ee te LOL Ca Ve Rt ie GE ten Sel MO ot en tee We Wen Re sn Vn ee DL ek iP 
we we We we wt we ee we we we Ve we et u We we ee we we we We we et we ee we We we We we we We we We we ee we ee we te ee ee ee we te et we ee 


CO19 
CO1C 
CO1F 
C022 
CO025 
C028 
CO2A 
CO2D 
C030 
CO31 
CO34 
CO37 
CO3A 
CO3B 
CO3E 
CO40 
C043 
CO44 
CO47 
C049 
CO4C 
CO4F 
C052 
CO54 
CO57 
CO5A 
CO5D 
CO60 
C063 
CO65 
CO68 
CO6B 
CO6C 
CO6F 
CO72 
CO75 
C076 
C079 
CO7B 
CO7E 
COTF 
C082 
C084 
C087 
COB8A 
CO8D 
CO90 
Co92 
CO95 
CO97 
CO9A 


LD ($COOO),A 
LD HL,$0000 
LD ($COO3), HL 
LD HL, $0028 
LD ($COO1),HL 
LD B, $28 

LD HL, ($COO1) 
CALL $COO5 
INC HL 

LD ($COO1),HL 
LD HL, ($CO03) 
CALL $COOB 
INC HL 

LD ($COO3),HL 
DJNZ @CO2A 

LD BL, $COOO 
DEC (HL) 

JP NZ,$CO28 
LD A,$20 

LD BC, $0028 
LD HL,$0398 
JP $CO11 

LD A,$17 

LD ($COOO),A 
LD HL, $03BF 
LD ($COO3),HL 
LD HL, $0397 
LD ($COO1),HL 
LD B,$28 

LD HL, ($COO1) 
CALL $COO5 
DEC HL 

LD ($COO1),HL 
LD HL, ($CO03) 
CALL $COOB 
DEC HL 

LD ($COO3), HL 
DJNZ @CO065 

LD HL, $CO00 
DEG (HL) 

JP NZ,$CO63 
LD A,‚$20 

LD BC, $0028 
LD HL, $0000 
Jep $CO11 

CALL $00BA 

LD A,‚$00 

CALL $00D5 

CP $01 

JP NZ, $COA0 
CALL $CO52 
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CO9D C3 A8 CO JP $COA8 


.; COAO FE 05 CP $05 

.; COA2 C2 A8 CO JP NZ, $COA8 
‚; COA5 CD 17 CO CALL $CO17 
‚; COA8 C3 8D CO JP $CO8D 

‚; COAB OO NOP 


In deze screen mode gaan we ‘scrollen’ in machinecode. U weet hoe dat gaat? 
Tijdens het listen van programmaregels wordt de tekst omhoog gezet en wordt een 
nieuwe regel onderaan het beeld geplaatst. Dit proces, ‘scrolling’, programmeren 
wij nu ook; niet alleen omhoog maar ook omlaag. 


We gebruiken een niet-cyclische scroll over het gehele scherm. Naar boven 
bewegend komt dit neer op het volgende: 


tweede regel op de eerste; 

derde regel op de tweede; 

laatste regel op de één na laatste; 
aanvullen met spaties. 


Naar beneden scrollen gaat natuurlijk precies andersom. 
Dit alles gebeurt als u op de cursortoetsen drukt. 


17.2 De routines op een rij 


VPEEK haalt een geadresseerde waarde uit het videogeheugen. Het adres staat in 
HL en de waarde komt in het A-register te staan. 


VPOKE plaatst de inhoud van het A-register in het door middel van HL geadres- 
seerde video-adres. 


VFILL vult een stuk videogeheugen met een bepaalde waarde. Die waarde komt 
in de accumulator. De lengte van het te vullen gebied komt in het BC-registerpaar 
en het beginadres (We vullen naar boven!) komt in het HL-registerpaar. 


SCROLUP scrolt natuurlijk omhoog. Eerst wordt een teller (op 23) geïnitial- 
iseerd, evenals het eerste schermadres ($0000) en het schermadres van de volgende 


regel ($0028). 
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Een regel is 40 tekens breed dus we maken een binnenlus met lengte 40. Vervolgens 
gaan we regels verplaatsen, van beneden naar boven. Dit alles 23 keer. 

Na het scrollen maken we gebruik van de VFILL-routine om de onderste regel 
snel van spaties te voorzien. 


SCROLDOWN scrolt omlaag. Wederom wordt een teller (op 23) geïnitialiseerd, 
evenals het laatste sehermadres ($03BF) en het schermadres van de vorige regel 
($0397). 

Een regel is 40 breed, dus we maken een binnenlus met lengte 40. Vervolgens gaan 
we regels verplaatsen, van boven naar beneden. Dit alles natuurlijk 23 keer. 

Na het scrollen maken we gebruik van de VFILL-routine om de bovenste regel 
snel van spaties te voorzien. 

INIT gaat ervan uit dat het scherm al in de 40 x 24-mode staat (u komt tenslotte 
uitde HERBYMON)en kijkt naar de CTRL/STOP-toestand. Niets aan de hand? 
Dan worden de cursortoetsen uitgelezen en aan de hand daarvan wordt actie 
ondernomen. 
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18 Tekst 32 x 24 


In de 32 x 24-tekst-mode (zie afb. 18.1) neemt de schermtabel 768 ( = 32 x 24) 
bytes in beslag. Het scherm bestaat uit een rooster van 32 x 24 tekens, in het 
videogeheugen beginnend op $ 1800. 

Elke waarde (0-255) in dit stukje videogeheugen wijst naar een patroon van 8 x 8 
pixels uit de karakterpatroontabel die op $0000 begint. 


TEEEEEEEEEBEEEEE! 
0123456789ABCDEFO12345678IABCDEF 6006 


$0688 ……………- 


$6788 


$8790 


S87FF 


$2000 UUUVAAAA G 8 t/m 7 
$2001 UUUVAAAA G 8 t/m 15 
$2010 UUUVAAAA & 128 t/m 135 


S201F UUUVAAAA G 248 t/m 255 


20545218 


Afb. 18.1. Screen mode Ì 
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De karakterkleuren (voorgrond en achtergrond) worden per groep van 8 in het 
videogeheugen vanaf adres $2000 geplaatst. Deze kleurentabel is dus 32 bytes 
groot. 
Sprites zijn toegestaan; de attributentabel begint op S1 BOO en de patroontabel op 
$3800. 


18.1 Karakters ontwerpen 


10000 ORIGIN ($c000) 

10010 —- 

10020 $004a CONSTANT RdVrm 
10030 $004d CONSTANT WrtVrm 
10040 $006f CONSTANT Init32 
10050 $009f CONSTANT ChGet 
10060 $00a2 CONSTANT ChPut 
10070 $00ba CONSTANT IscNte 
10080 $0156 CONSTANT KílBuf 
10090 —- 

10100 $f3af CONSTANT Lin32 
10110 $f3dd CONSTANT CrsX 
10120 $f3de CONSTANT CrsY 
10130 $fca7 CONSTANT EscCnt 
10140 —- 

10150 CODE 

10160 -- 

10170 :Help „by $00 
10180 :Teller „by $00 
10190 :Positie wo $0000 


10200 —- 

10210 :VPeek 

10220 di 

10230 call #RdV rm 
10240 ei 

10250 ret 

10260 -—- 

10270 :VPoke 

10280 di 

10290 call #WrtVrm 
10300 ei 

10310 ret 

10320 -— 


10330 :GetPos 

10340 ld a, #0 

10350 ld b‚a 

10360 ld a,(#Teller) 
10370 sla a 

10380 rl b 

10390 sla a 
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10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
107390 
10800 
103810 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10890 
10900 
10910 
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ld (#Positie),a 
ld a,b 

ld (#Positietl),a 
ret 


:GetLin 


ld a, (#CrsY) 


:GetLin0 


cp #11 

retif az 

ld de, (#Positie) 
inc de 

ld (#Positie),de 
dec a 

jp #GetLin0 


:GetCol 


ld b,‚,#128 
ld a, (#CrsX) 


:GetCol0 


:S 


e 


cp #13 
retif z 

srl b 

dec a 

jp #GetCol0 


tup 
1d hl,#$1800 
ld a,#0 


:Setup0 


call #VPoke 

inc hl 

inc a 

jpif nz, #Setup0 
call #GetPos 

ld d,#8 

ld hl,#$194c 


:Setupl 


ld e,‚#8 

push hl 

ld hl, (#Positie) 
call #VPeek 

inc hl 

ld (#Positie),hl 
pop hl 

ld b,#128 


:Setup2 


ld (#Help),a 
and b 


10920 
10930 
10940 
10950 
10960 
10970 
10980 
10990 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11080 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
11160 
11170 
11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11390 
11400 
11410 
11420 


:P 


ld a,#196 
ELSE 
ld a,#219 
FI 
call #VPoke 
inc hl 
srl b 
ld a, (#Help) 
dec e 
jpif na,#Setup2 
ld be, #$0018 
add hl,bce 
dec d 
jpif na,#Setupl 
ret 


lus 
ld hl,#&Teller 
ine (hl) 
ret 


:Min 


:U 


ld hl,#Teller 
dec (hl) 
ret 


P 
ld a, (#CrsY) 
cp #11 
retif z 
ld a,#$le 
jp #ChPut 


: Down 


:L 


ld a, (#CrsY) 
cp #18 
retif a 

ld a,#$1f 
jp #ChPut 


eft 

ld a, (#CrsX) 
cp #13 

retif z 

ld a,#$1d 

jp #ChPut 


:Right 


ld a, (#CrsX) 
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11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11680 
11690 
11700 
11710 
11720 
11730 
11740 
11750 
11760 
11770 
11780 
11790 
11800 
11810 
11820 
11830 
11840 
11850 
11860 
11870 
11880 
11890 
11900 
11910 
11920 
11930 


128 


cp #20 
retif z 
ld a,t#$1c 
jp #ChPut 


:Pixel 


call #GetPos 
call #GetLin 
call #GetCol 
ld hl; (#Positie) 
call #VPeek 


xor b 
call #VPoke 
jp #HRight 
:JmpTab ‚wo #Plus 
„wo #&Min 
‚wo #Up 
‚wo #Down 
‚wo HLeft 
‚wo H#Right 
‚wo #Pixel 
:KeyTab ‚by 43 
‚by 45 
.by $le 
‚by $1f 
‚by $1d 
‚by $lc 
.by 32 
„by 0 
: Sel f Mod 
jp #SelfMod 
:Init 
ld a,#32 


ld (#Lin32),a 
call Init32 
ld a,#13 

ld (#CrsX),a 
ld a,#11 

ld (#&CrsY),a 


:Iníit0 


call #Setup 
call #KilBuf 


:Init1 


call #IseNte 
ld a,#0 

ld (#EscCnt),a 
call #ChGet 


11940 
11950 
11960 


ld (#Help),a 
ld hl,#&KeyTab 
ld de, #JmpTab 


11970 :Init2 


11980 
11990 
12000 
12010 
12020 
12030 
12040 
12050 
12060 
12070 
12080 
12090 
12100 
12110 
12120 
12130 
12140 
12150 


ld a, (hl) 

ep #0 

Jpif z,#Init1 
ld a, (#Help) 


12160: == 
12170 ENDCODE 


.: CO00 
.: CO04 
.: CO08 
‚3 COOC 
.: CO10 
.: CO14 
.: CO18 
es GO1C 
.: CO20 
‚: CO24 
.: CO28 
.…s CO2C 
.…: C030 
.: CO34 
‚: C038 
« CO3C 
…: CO40 
„: CO44 
.: CO48 
5 GCO4C 

: CO50 


ep (hl) 
IF z THEN 
ld a,(de) 
ld (#SelfMod+1),a 
inc de 
ld a, (de) 
ld (#SelfMod+2),a 
call #SelfMod 
jp #Init0 
FI 
inc hl 
inc de 
inc de 
jp #Init2 
08 60 00 0D "ae zt GOB IC Ce DO GA PER” 
FS OD 4A- 00 “ocd zis GORBED 10 GO TE Perm 
BBICS RS OD Pae «* COSGC 08 21 4C TB “ALT 
4D OO FB C9 “M...* … GO60 TE O8 EI ZK “nk 
SE 00 47 JA ">.G:" „16054 02:60 CH OA Vorrs” 
OL IGK OB ML Wars 3 COG8: GO 23 2208 nt 
GE 1D OBURT OUt «ie CO8C CO BLOB BO “pes 
CH 40 EBIT “ran … 10070 32 00 60 AB “Zus 
GE AO IE DE Tre Jr WG0TA CG AO CO IB “iS 
Co 78 32-03 “az ct GOTS GA CI AW WGO Verne 
CO CH-IA DE Psn Ss GCOTG SE DBED OA "Dos 
F3 EE OB GB Soros ‚: CO80 CO 23 CB 38 “".#.8” 
KD SB 02 OB Tele …* CO84 IJA OO CO ID “E….” 
13: ED B O2 “Dn «tt OUS8- 62 10 O0 DE peo” 
CO SD CH 2D em at GOBG 18:00 O8 FE Paro 
GO 068 30 BAK Tart 1 IC090 De BO OU CD “bau 
DNS MEO Orne ‚s CO94 21 O1 CO 34 “17.4” 
C8 CB 38 3D "‚.8=" 1516098 CH 21 O1 GO Pl,” 
CS 42 60 21 "BA" «s CONG 35 CO ADG “Bae” 
00 28 35-00 "rt ss GOAO P3 Ph OBB Poa 
GD OAD 23 “nett ‚1 COA4 SE 2 CI AB Wee 
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.: COA8 
…& COAC 
.: COBO 
‚: COB4 
.: COB8 
© COBC 
ss C0C0 
3 COC4 
‚: COC8 
:n OOGE 
„5 CODO 
.: COD4 
.: COD8 
.: CODC 
.: COEO 
.: COE4 
.: COES8 
‚3 COEC 
.: COFO 
.: COF4 


Ene WT AD DT IR Ik ME ID EE ot 
we we es ee we ee ve ee we We we et ge et ne et en Be we et we ee ne ee en et we 
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CO04 
CO05 
C008 
CO09 
COOA 
COOB 
COOE 
COOF 
CO10 
CO12 
CO13 
CO16 
C018 
CO1A 
CO1C 
COLE 
C020 
C022 
C025 
CO26 
CO29 
CO2A 
CO2D 
Co2F 
CO030 
CO34 
C035 


00 


Co 


CO 
CO 
F3 


02 CO 


DI 
CALL $004A 
EI 


DI 
CALL $004D 


LD ($COO2),A 
LD A,B 

LD ($COO3),A 
RET 

LD A, ($F3DC) 
CP $0B 

RET Z 


LD DE, ($COO2) 
INC DE 


‚: COF8 


COFG 


“: C100 
„: C104 
: C108 


C10G 


\: C110 


C114 


de Ci18 
„. GIC 
5 6120 
‚: C124 
.:,C128 
…… €126 
‚: C130 
Je G194 
: C138 
: C13C 
: C140 
: C144 


02 CO LD ($COO2),DE 


„von 


CO39 
CO3A 
CO3D 
CO3F 
CO42 
CO44 
C045 
CO47 
CO048 


.; CO4B 


CO4E 
CO50 
C053 
CO54 
CO55 
CO58 
CO5B 
CO5D 
C060 
C062 
C063 
CO66 
CO69 
CO6A 
CO6D 
COBE 
C070 


‚5 CO73 


st BLS TO Tt De SA EO A AT AE EI TOEN ir En De vas WV ol SO vite rit Wer vin as vl a re DE AD AE IE 
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CO74 
C077 
C079 
COTC 
CO7E 
CO81 
C082 
CO84 
CO87 
C088 
CO8B 
COBE 
CO8F 
CO90 
CO93 
CO94 
CO97 
CO98 
Co99 
COC 
CO9D 
COJE 
COA1 
COA3 


DC 
OB 


CO 
F3 


CO 
18 


CO 
CO 
Co 
19 
CO 
Co 
CO 


Co 
CO 
Co 
Co 
CO 
CO 
00 


Co 
Co 


Co 


F3 


DEC A 

JP $CO2D 

LD B,$80 

LD A,‚($F3DD) 
CP $0D 

RET 2 

SRL B 

DEC A 

JP $CO42 

LD HL,$1800 
LD A‚$00 
CALL $COOA 
INC HL 

INC A 

JP NZ,$CO50 
CALL $CO10 
LD D,$08 

LD HL,$194C 
LD E‚$08 
PUSH HL 

LD HL, ($CO02) 
CALL $COO4 
INC HL 

LD ($COO2),HL 
POP HL 

LD B,$80 

LD ($COOO),A 
AND B 

JP NZ,$CO7C 
LD A‚$C4 

JP $COT7E 

LD A‚$DB 
CALL $COOA 
INC HL 

SRL B 

LD A,‚($CO00) 
DEC E 


JP NZ,$CO70 
LD BC,$0018 
ADD HL,BC 
DEC D 

JP NZ,$CO60 


RET 

LD HL,$COO1 
INC (HL) 
RET 

LD HL,$COO1 
DEC (HL) 

RET 

LD A, ($F3DC) 
CP $0B 

RET 2 
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Re ier et MA IN IR er et We enk Be A Ber El Vk AS or A Br Hb 5 Gie DE A Ha B oe kes ok AEL IA 
we we we we we we we we We we we we Ut we We we er we we we we we we we We we we we we we We us We we We we we ue We we We we We we we we we we we we we we 


ed 


— 
tod 


Lj 


COA4 
COA6 
COA9 
COAC 
COAE 
COAF 
COB1 
COB4 
COB7 
COB9 
COBA 
COBC 
COBF 
COC2 
COC4 
COC5 
COC7 
COCA 
COCD 
CODO 
COD3 
COD6 
COD9 
CODA 
CODD 
COEO 
COE1 
COE2 
COE3 
COE4 
COES 
COE6 
COE7 
COE8 
COE9 
COEA 
COEB 
COEG 
COEF 
COFO 
COF2 
COF3 
COF4 
COF6 
COF9 
COFB 
COFE 
C101 
C103 
C106 
C108 
C10B 


00 
F3 


2B 


CO 


F3 
00 


F3 


F3 
CO 


LD A,$1E 

JP $00A2 

LD A,‚($F3DC) 
CP $12 

RET Z 

LD A,$1F 

JP $00A2 

LD A,‚($F3DD) 
CP $0D 

RET 2 

LD A,$1D 

JP $00A2 

LD A, ($F3DD) 
CP $14 


CALL $CO10 
CALL $CO2A 
CALL $CO3D 
LD HL, ($CO02) 
CALL $COO4 
XOR B 

CALL $COOA 
JP $COBF 
SUB H 

RET NZ 

SBC A,C 
RET NZ 

SBC A, (HL) 
RET NZ 


JR NZ,@COF6 
JP $COF6 

LD A,$20 

LD ($F3AF),A 
CALL $006F 
LD A‚,$0D 

LD ($F3DD),A 
LD A,‚$0B 

LD ($F3DC),A 
CALL $CO4B 


C1OE CD 56 O1 CALL $0156 


„; C111 CD BA 00 CALL $00BA 

‚ C114 3E 00 LD A,‚$00 
‚; C116 32 A7 FC LD ($FCA7),A 

‚ C119 CD 9F 00 CALL $0O09F 
‚; C11C 32 00 CO LD ($CO00),A 

; CIIF 21 EE CO LD HL, $COEE 
‚; C122 11 EO CO LD DE, $COEO 

‚ C125 7E LD A, (HL) 

.; C126 FE 00 CP $00 

‚ C128 CA 11 C1 JP Z,$C111 
.; C12B 3A 00 CO LD A, ($CO00) 

‚ C12E BE CP (HL) 

‚; Ci2F C2 41 C1 JP NZ,$C141 

‚ C132 1A LD A, (DE) 

„; C133 32 F7 CO LD ($COF7),A 
‚s C136 13 INC DE 
„» GIST LA LD A, (DE) 

‚ C138 32 F8 CO LD ($COF8),A 
.; C13B CD F6 CO CALL $COF6 
., C13E C3 OB C1 JP $C10B 
‚; C141 23 INC HL 
.s C142 13 INC DE 
‚; C143 193 INC DE 

; C144 C3 25 C1 JP $C125 

; C147 JE 1D LD A,$1D 


Als programmeervoorbeeld een karakterset-editor. Het wordt nu mogelijk om 
zelf een echte 8 x 8 karakterset te ontwerpen. 

Natuurlijk kunt u deze zelf ontworpen leestekens ook opslaan. Dit gaat vanuit 
BASIC met een video-SAVE-opdracht. Zo’n opgeslagen karakterset kunt u 
naderhand met een video-LOAD-commando weer ophalen. 

U kunt met behulp van de karaktertabel uit appendix B en de listings heel 
eenvoudig uitzoeken hoe de karakterontwerper nu precies werkt. Dit zelf uitzoe- 
ken is niet zonder reden. Als u namelijk weet hoe het edit-principe in elkaar steekt, 
wordt het zeer eenvoudig om zelf commando's toe te voegen en eigen editors te 
ontwerpen. 

Welke commando's en editors? Dat hangt van uw eigen fantasie en behoeften af. 


18.2 De routines op een rij 
VPEEK, u inmiddels bekend uit de vorige listing. 
VPOKE, idem dito. 
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GETPOS berekent de plaats waar de informatie over het huidige karakter staat. 
Dit komt neer op een ‘karakter maal 8’-berekening. 

We doen dit met behulp van een schuifinstructie. Denkt u even mee! Als we een 
bitpatroon naar links schuiven, doen we niets meer dan vermenigvuldigen met 2. 
Driekeerschuivenisdus2 x 2 x 2 = 8. (Even tussendoor: naar rechts schuiven is 
delen door 2...) 


GETLIN kijkt welk byte uit het patroon van 8 thans wordt bewerkt. We kijken 
hiervoor naar de Y-waarde van de cursor. 


GETCOL kijkt welk BIT uit het byte thans wordt bewerkt. We kijken hiervoor 
naar de X-waarde van de cursor. 


SETUP tovert een karakterset en het thans bekeken karakter te voorschijn. Eerst 
initialiseren we het HL-paar op $1800 (begin van de schermtabel), en we ‘“video- 
poken’ de waarden 0-255 op het beeld. 

Van het nu bekeken karakter wordt de positie berekend en er wordt 8 (de hoogte) 
maal 8 keer (de breedte) het juiste pixel afgedrukt. 

PLUS verhoogt het huidige karakter met één. 

MIN verlaagt het huidige karakter met één. 

UP verplaatst, indien mogelijk, de cursor één locatie naar beneden. 

DOWN verplaatst, indien mogelijk, de cursor één positie naar boven. 

LEFT verplaatst, indien mogelijk, de cursor één positie naar links. 


RIGHT verplaatst, indien mogelijk, de cursor één positie naar rechts. 


PIXEL berekent de pixelpositie van de cursor en XOR-t deze waarde met de 
desbetreffende bitadressering. Pixel aan wordt pixel uit en andersom. 


JMPTAB bevat de adressen die worden aangeroepen als er op een commando- 
toets wordt gedrukt. 


KEYTAB bevat de ASCII-waarden die horen bij de commandotoetsen. Een 
KEYTAB-adressering is niet meer dan een pointer naar de vorige tabel. 
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SELFMOD is een CALL-routine die door de key scan wordt veranderd als er op 
een commandotoets wordt gedrukt. 

Stel dat de PLUS-routine moet worden aangeroepen. Het low-byte van PLUS 
komt van KEYTAB en wordt op SELFMOD + 1 geplaatst, Het high-byte van 
PLUS komt van KEYTAB + l en wordt op SELFMOD + 2 geplaatst. 


INET stelt de juiste schermbreedte en screen mode in, waarna (met CTRL/STOP- 
check) de juiste commando's worden bepaald enz. 


135 


19 High resolution 


In de high resolution mode of hires mode (zie afb. 19.1) neemt de schermtabel 768 
(= 32 x 24) bytes in beslag. Het scherm bestaat uit een rooster van 32 x 24 
karakters, in het videogeheugen beginnend op $ 1800. 


In tegenstelling tot de screen mode uit het vorige hoofdstuk kan iedere scherm- 
positie nu over een eigen plaats in de karakterset beschikken. Dit wordt gedaan 
door drie verschillende karaktersets te gebruiken. Een karakterset voor de boven- 
ste 8 regels ($0000-$07FF), een karakterset voor de middelste 8 regels ($0800- 
SOFFF) en een karakterset voor de onderste acht regels ($1000-$ 17 FF). Elke 
waarde op een schermgedeelte (0-255) wijst naar een plaats in de bijpassende 
karakterset. Een 8 x 8 pixelpatroon dus, met 6K aan karakterinformatie. 

De karakterkleuren (voorgrond en achtergrond) worden per regel bepaald. Voor 
de eerste karakterset staat de kleurentabel op $2000-$27FF, voor de tweede 
karakterset op S2800-$2FFF en voor de derde karakterset op $3000-$37FF. Er is 
dus ook 6K aan kleurinformatie. 

Sprites zijn toegestaan; de attributentabel begint op $1B00 en de patroontabel 
begint op $3800. 


19.1 Spelletje spelen? 


10000 ORIGIN ($c000) 

10010 == 

10020 $000c CONSTANT RdSlt 
10030 $0056 CONSTANT FilVrm 
10040 $005ec CONSTANT LDirVm 
10050 $0072 CONSTANT IniGrp 
10060 $00ba CONSTANT IseNtce 
10070 $00d5 CONSTANT GtStck 


10080 -- 

10090 $fI1f CONSTANT CgPnt 
10100 -- 

10110 CODE 

10120 == 

10130 :Big „by $00 
10140 :Tiny ‚by $00 
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hidnid 
bandnd 
ded 
and 
ess 


Kad adhadhidhadhdhadhadhadhadhadhadheidiadhididdiidhididdadiddd 
maanden endendeendeend 
PPDPDPDDPPOOODOSGODEE EE 
MOPOPANDMOPENANSMODPEN 
sossssssossssssessssss 


$0788 


$8790 


$07FF 


IDEEEN 
012345678IABCDEFO12345678IABCDEF 


0905600005000 000900000000000000000 
000000000000 00000000000000000000 
00000000000000000000000000 000000 


tststststst 
tspbhtttststbntstn 31 5E 
GSEPEGEEBSESEEEEEEEEEBEEEEEREEEE 


808 VUUVAAAA $1698 
801 VUUVAAAA 

882 UVUVVAAAA 
0 UUUVAAAA 
UUUVAAAA 
UUUVAAAA 
VUUUVAAAA 
UUUVAAAA 


$1008 


UUUVAAAA …………. $1788 
VUUVAAAA ………. 
VUUVAAAA 
VUUVAAAA 
UUUVAAAA 
UUUVAAAA 
UUUVAAAA 
UUUVAAAA $1798 


UUUVAAAA ……-…. SI7FF 
00000000 
76543218 


Afb. 19.1. Screen mode 2 


UUUVAAAR 


UUUVAAAA 
UUUURAAA 
UVUUVAAAA 
UUUUAAAA 


UUUUAAAA 
UUUUAAAA 
UUUVAAAR 
VUUUAAAA 
VUUVAAAA 
VUUUAAAA 
UUUVAAAA 
UUUVAAAA 


EEEN) 


UUUVAAAA 
00000000 
76543218 
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10160 :Buffer „wo $9000 


10170 :Game „wo $3000 
10180 :Info „wo $6000 
10190 -- 

10200 :VFill 

10210 di 

10220 call #FilVrm 
10230 ei 

10240 ret 

10250: == 

10260 :RYMove 

10270 di 

10280 call #LDirVm 
10290 ei 

10300 ret 

10310 -- 

10320 :Up 


10330 ld hl,#Big 
10340 ld a,(hl) 
10350 cp #0 
10360 retif z 
10370 dee (hl) 
10380 ret 

10390 -- 

10400 :Down 

10410 ld hl,#Big 
10420 ld a,(hl) 
10430 cp #240 
10440 retif z 
10450 ine (hl) 
10460 ret 

10470 -—- 

10480 :Right 

10490 ld hl,#&Tiny 
10500 dec (hl) 
10510 ret 

10520 -—- 

10530 :Left 

10540 ld hl,#Tiny 
10550 inc (hl) 
10560 ret 

10570 -- 

10580 :ShowGame 
10590 ld a, (#Big) 
10600 ld l,a 
10610 1d h,‚#0 
10620 sla 1 
10630 rik 

10640 sla 1 
10650 rl h 
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10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10890 
10900 
10910 
10920 
10930 
10940 
10950 
10960 
10970 
10980 
10990 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11080 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
11160 
11170 


ld be, (#Game ) 
add hl,bc 

ld be, #$0200 
ld de, #$1800 
jp #RVMove 


:ShowInfo 


ld de, (#Buffer) 
ld hl, (#Info) 
ld a, (#Tiny) 

ld l,a 

ld c,#8 


:ShowInfo0 


ld b,#32 


:ShowInfoi 


ld a,(hl) 

ld (de),a 

inc de 

inc 1 

djna #&ShowInfol 
inc h 

ld a, (#Tiny) 

ld l,a 

dee Cc 

jpif na, #ShowInfo0 
ld be, #$0100 

ld de,#$1a00 

ld hl, (#Buffer) 
jp #RVMove 


:Joy 


ld a, #0 
call #GtStck 
ld b‚a 
cp #1 
IF z 
THEN 
call #Up 


call #Right 
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11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
11280 
11230 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11390 
11400 
11410 
11420 
11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11680 
11690 


140 


THEN 
call #Down 


call #Left 


call #ShowGame 
Jep #ShowInfo 


Init 


call #IniGrp 

ld be, #$0800 

ld de, (#Buffer) 
ld hl, (#CgPnt+1) 


:Init0 


push be 

push de 

ld a, (#CgPnt) 
call #RdS1t 
pop de 

pop be 

ld (de),a 

inc de 

ince hl 

dec c 

jpif na,#Init0 
dec b 

Jpif na,#Init0 
ld be, #$0800 

ld de, #$0000 
ld hl, (#Buffer) 
call #RVMove 
ld be, #$0800 

ld de, #$0800 
ld hl, (#Buffer) 
call #RVMove 
ld be, #$0800 
ld de, #$1000 
ld hl, (#Buffer) 
call #RVMove 
ld a,#%00111100 
ld be, #$1000 
ld hl,#$2000 
call #VFill 

ld a,#%11110001 
ld be, #$0800 
ld hl,#$3000 


11700 call #VFill 
11710 :Initi 

11720 call #IscNte 
11730 call HJoy 
11740 jp #Init1 
11750 -—- 

11760 ENDCODE 


: CO00 00 00 00 90 “".‚....” 
‚: CO04 00 30 00 690 ".O,'" 
‚40008! F3 LD: 56 00 V 
GOOG EB C9 ES CD oars 
ei CO10: 5C 00 EB GI No 
‚…: GOI4 21 00 CO TE boas 
‚: CO18 FE 00 C8 35 "...5" 
… GOIG CI 2100 GB Talos 
5 6020 TR FE FO-0B "rn 
‚: CO24 34 CI 21 O1 "4.!.” 
„: CO28 CO 95 CB 21 ".-5.l" 
„… CO2C O1 CO 34 C9 "4.7 
.: CO30 3A 00 CO 6F ":. 

.: CO34 26 00 CB 25 “&.. 
.: CO38 CB 14 CB 25 “. 
.: CO3C CB 14 CB 25 
.: CO40 CB 14 CB 25 
.: CO44 CB 14 CB 25 
.: CO48 CB 14 ED 4B 
‚: CO4C 04 CO O9 O1 
„: €050 00 O2 11 00 
„ GO5A 1E GI OE LO aaan 
«…: GO58 ED 5B 02 60 ".L.….” 
‚: CO5SC 2A 06 CO 3A “"*.‚‚:" 
.: CO60 O1 CO 6F OE “"..o.” 
<5 6064 08,08 20 UB. ee 
«s CO68 12 13 26 40 osn 
‚: CO6C FA 24 3A O1 “.$:.” 
‚: CO70 CO 6F OD C2 “.o..” 
«kt GO74 65: GO O1 00 eu” 
a MOAB OA EL IOO: Ar oa 
.: CO7C 2A 02 CO C3 “"*‚.." 
‚: CO80 OE CO 3E 00 “"..>.” 
.: CO84 CD D5 00 47 “...G" 
> GO98- FE OL LZ DD oe 


ARENO 


… GOB8C 
‚: CO90 
‚… CO94 
‚: CO98 
.…: CO9C 
.: COAO 
.: COAM4 
‚3 COAS8 
‚5 COAC 
‚: COBO 
‚…s 'COB4 
‚: COB8 
‚3 COBG 
‚.: COCO 
.: COC4 
.: COC8 
‚3 COGC 
«< CODO 
‚: COD4 
.s COD8 
‚: GODC 
„: COEG 
.: COE4 
‚: COES8 
3 COEC 
„: COFO 
.: COF4 
: COF8 


COFC 


ot 200 
«% C104 
.: C108 
,: C10C 
‚: C110 

: C114 


141 


142 


CO08 
Coo9 
COOC 
COOD 
COOE 
COOF 
CO12 
CO13 
CO14 
CO17 
C018 
CO1A 
CO1B 
CO1C 
CO1D 
CO20 
CO21 
C023 
CO24 
C025 
CO26 
CO29 
CO2A 
CC2B 
CO2E 
CO2F 
CO30 
C033 
CO34 
CO36 
C038 
CO3A 


; CO3C 


CO3E 
CO40 
CO42 
CO44 
CO46 
CO48 
CO4A 
CO4E 
CO4F 
C052 
CO55 
C058 
CO5C 
COSF 
CO62 
C063 
CO65 
CO67 


56 


5C 


00 


00 


Cô 


CO 


CO 


CO 


CO 


CO 


CO 


DI 

CALL $0056 
EI 

RET 

DI 

CALL $005C 
EI 

RET 

LD HL, $COO00 
LD A, (HL) 
CP $00 

RET Z 

DEC (HL) 
RET 

LD HL,$COO0 
LD A, (HL) 
CP $FO 

RET Z 

INC (HL) 
RET 

LD HL,$COO1 
DEC (HL) 
RET 

LD HL,$COO1 
INC (HL) 
RET 

LD A‚($CO00) 
LD L, 

LD H,‚,$00 
SLA L 

RL H 

SLA L 

RL H 

SLA L 

RL H 

SLA L 

RL H 

SLA L 

RL H 

LD BC, ($CO04) 
ADD HL,BC 
LD BC,$0200 
LD DE,$1800 
JP $COOE 


LD DE, ($CO02) 
LD HL, ($COO6) 
LD A‚($COO1) 


C068 
C069 
CO6A 
CO6B 
CO6D 
COBE 
CO71 
C072 
C073 
C076 
CO79 
CO7C 
COTF 
CO82 
CO84 
COB7 
C088 
COBA 


‚; CO8D 


EN eN RRT et WD EO Dre We Ie En vi ep Ke Tee ME KW RMR IR ERE 
ee ve Be ve ve ve Be we Ve we Be we ve ve Ve we ve ve ve we Ve we Ve we Ve ve Ve we ve we We we ve we et we ve ve WO Be VE ve We we Ve we ve we ve we we Ve 


CO30 
CO91 
CO93 
CO96 
CO99 
CO9A 
CO9C 
CO9F 
COA2 
COA3 
COAS5 
COA8 
COAB 
COAE 
COB1 
COB4 
COB7 
COBB 
COBE 
COBF 
COCO 
COC3 
COC6 
COCT 
COC8 
COC9 
COCA 
COCB 
COCC 
COCF 
CODO 
COD3 
COD6 


CO 


LD (DE),A 
INC DE 

ING L 

DJNZ @CO67 
INC H 

LD A,‚($COO1) 
D L, 

DEC C 

JP NZ,$CO65 

LD BC, $0100 
LD DE,$1A00 

LD HL, ($CO02) 

JP $COOE 

LD A,‚$00 
CALL $00D5 

LD B,A 

CP $01 

JP NZ,$CO90 
CALL $CO14 

LD A‚B 

CP $03 

JP NZ,$CO99 
CALL $CO26 

LD A‚B 

CP $05 

JP NZ,$COA2 

CALL $COID 

LD A‚B 

CP $07 

JP NZ, $COAB 
CALL $CO2B 

CALL $CO30 

JP $CO58 

CALL $0072 
LD BC,$0800 

LD DE, ($CO02) 
LD HL, ($F920) 

PUSH BC 

PUSH DE 

LD A, ($F91F) 
CALL $000C 

POP DE 

POP BC 

LD (DE),A 
INC DE 

INC HL 

DEC C 

JP NZ, $COBE 

DEC B 

JP N4,$COBE 
LD BC, $0800 

LD DE, $0000 
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COD9 2A O2 CO LD HL, ($CO02) 


; CODC CD OE CO CALL $COOE 
‚; CODF O1 O0 08 LD BC,$0800 

‚ COE2 11 OO 08 LD DE, $0800 
‚; COE5 2A 02 CO LD HL, ($CO02) 

‚ COEB8 CD OE CO CALL $COOE 
.; COEB O1 00 08 LD BC,$0800 
‚; COEE 11 00 10 LD DE, $1000 
.; COF1 2A 02 CO LD HL, ($COO2) 
.; COF4 CD OE CO CALL $COOE 
.; COF7 3E 3C LD A,$3C 
„; COF9 O1 00 10 LD BC,$1000 
‚; COFC 21 00 20 LD AL,$2000 
.; COFF CD 08 CO CALL $CO08 
‚; C102 3E F1 LD A‚$F1 
.; C104 O1 00 O8 LD BC,$0800 
.; C107 21 00 30 LD HL,$3000 
.; C10A CD 08 CO CALL $COO08 
.; C10OD CD BA 00 CALL $00BA 
‚; C110 CD 82 CO CALL $CO82 
„; C113 C3 OD C1 JP $C1OD 

; C116 32 A7 FC LD ($FCA7),A 


De hires mode is de geschiktste scherm-mode voor spelprogrammering. Alle 
karakters zijn afzonderlijk te definiëren en ook met de kleurmogelijkheden is het 
prima in orde. Als voorbeeld krijgt u dan ook een spelprobleem. Probleem? Jawel, 
want bij spelletjes gaat het vooral om snelheid en beeldkwaliteit. Het liefst ook 
nog eens zoveel mogelijk schermen, u kent dat wel. 


We gaan wederom scrollen, maar op een totaal andere manier. Waar het in ons 
eerste programmeervoorbeeld van dit hoofdstuk om een ‘op het scherm’-scroll 
ging, gaan we nu vanuit het normale geheugen scrollen, en wel zo snel mogelijk. 
Stelt u zich eens een verticale pijp voor, met een breedte van 32 tekens en een lengte 
van 256 tekens. Aangezien de toegestane schermhoogte 16 tekens (twee karakter- 
sets) gaat worden, kunnen we onmogelijk het hele speelveld laten zien. Het scherm 
fungeert als het ware als een venster waardoor we steeds één zestiende van het 
totale oppervlak kunnen bekijken. (Scrollen met de cursortoetsen) 

We nemen ook een horizontale pijp, met een breedte van 256 tekens en een hoogte 
van 8 tekens. De maximale breedte van een scherm is 32 tekens, dus ook hier 
moeten we scrollen, alweer met de cursortoetsen. 
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Door middel van een adresseringstruc worden de schermen uit het BASIC-ROM 
gekopieerd (zodat u iets ziet als u het de eerste keer probeert), maar het is uiteraard 
zeer eenvoudig om de bewuste pointers naar RAM te laten wijzen. RAM waar u 
zelf een mooi scherm kunt maken, met wellicht een zelfgeschreven editor? 


19.2 De routines op een rij 


VFILL vult een stuk videogeheugen met een door u bepaalde waarde. De accu- 
mulator bevat deze waarde. Het BC-registerpaar bevat de lengte, het HL-register- 
paar het beginadres. 


RVMOVE verplaatst een stuk gewoon geheugen naar hetvideogeheugen. in BC 
staat de lengte, in DE het beginadres van het videogeheugen en in HL het 
beginadres van het gewone geheugenblok. 


UP scrollt indien mogelijk omhoog. 
DOWN scrollt indien mogelijk omlaag. 
RIGHT scrollt indien mogelijk naar rechts. 
LEFT scrollt indien mogelijk naar links. 


SHOWGAME laat een gedeelte van de verticale pijp op het scherm zien; het 
speelveld zullen we maar zeggen. 

Het beginadres wordt met een “maal 32’-berekening en een eenvoudige offset- 
optelling naar HL gecalculeerd. Als dit geheugenadres eenmaal is gevonden, volgt 
een razendsnelle BIOS-kopieerroutine. 


SHOWINFO laat een gedeelte van de horizontale pijp op het scherm zien, laten 
we zeggen het informatieve gedeelte. (Tellers en zo.) 

Nu moet u het high-byte en het low-byte even afzonderlijk bekijken. In het low- 
byte plaatsen we steeds de horizontale begin-pointer. In het high-byte komt het 
pagina-adres van de lijn die op dat moment aan de beurt is. 

Tijdens het naar de buffer kopiëren van een horizontale lijn verhogen we alleen het 
low-byte (L), voor de volgende lijn verhogen we het high-byte (H). 

We kopiëren niet meteen naar het scherm in verband met snelheidsverlies. Een 
RVMOVE-routine is altijd VEEL sneller dan afzonderlijk ‘ge-poke’. 
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JOY kijkt naar de cursortoetsen en verandert de scherm-pointers indien noodza- 
kelijk. 


INIT zet het scherm in de hires mode en gaat vervolgens de karakterset uit het 
ROM kopiëren. Eerst naar een buffer, om vervolgens diezelfde karakterset 3 keer 
naar het videogeheugen weg te zetten. 

Met de VFILL-routines zorgen we voor de juiste karakterkleuren op de juiste 
plaatsen. 
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20 Multi Color 


De veel kleuren-mode dus. Een verschrikkelijk ondoorzichtige scherm-mode (zie 
afb. 20.1), iets dat veel programmeurs afschrikt. Het enige dat u doet, is blokjes op 
het scherm zetten. 64 x 48 blokjes, zo u wilt met ieder een eigen kleur. 


BEER EEEEEEEEE EES 
012345678IABCDEFB 1230567 e PAD EDE 


$ > BL a} 
Ee Bes KN3 
Ee MKD 
B Mit SP 
4 - 6,1 (a) 
3 € Ben EP 
8 = 4,3. Ke} 
ge Be KR 
8 - 6,1 (a) 
Se Zen OD 
8 - 4,5 Cc} 
1 = 6,7 (d) 
3e Bik SM 
Kn Hen ADP 
te GE AED 
se Gr 
6 —- 6,1 (a) 
Le Hi EDR 
8 48 KE3 
 » Ef 9 
8 - 6,1 (Ca) 
Kk * ZED 
3 == 4,3 €c3 
3 =— 6,7 Ld) 


$0008 AAAABBBB — 0 
Eekenpop 1 Oe 
Re 
tE Le EEE 
Gooopprr - 7 2 Cd © 
€080B sasoses 00081111 
… 22223333 
333 
$0788 AAAABBBB — 8 22223 
EN 5 en ad 
u ken 
ES Bep 
Gooorppr - 7 ) Cd 
$0798 ….…. 
sSo7FF 


Afb. 20.1. Screen mode 3 
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In deze ‘veel kleuren’-mode neemt de schermtabel 768 ( = 32 x 24) bytes in 
beslag. Het scherm bestaat uit een rooster van 32 bij 24, in het videogeheugen 
beginnend op $0800. 

De karakterset (beter is: “kleurenset’) begint op S0000 en loopt tot $07FF. In deze 
kleurenset zit ‘m de grap. Twee bytes zijn namelijk voldoende om een 8 x 8 blokje 
in te kleuren. Slim als de MSX-computer is, gebruikt hij de eerste twee bytes uit 
zo’n (normaal is de karakterlengte 8) kleurenkarakter voor de O-regels, de tweede 
twee bytes zijn voor de l-regels, de derde twee bytes voor de 3-regels en de vierde 
twee bytes tot slot zijn voor de 4-regels. 

Even terug naar dat 8 x 8-blok. In zo’n 8 x 8-blok zit in feite een viertal 4 x 4- 
pixels (‘bixels’ in dit geval, want ze zijn een stuk groter) geadresseerd door twee 
bytes. Het high-nybble van het eerste byte zorgt voor het 4 x 4-bixel linksboven, 
het low-nybble van het eerste byte zorgt voor het 4 x 4-bixel rechtsboven, het 
high-nybble van het tweede byte zorgt voor het 4 x 4-bixel linksonder en het low- 
nybble van het tweede byte zorgt voor het 4 x 4-bixel rechtsonder. 

Sprites zijn toegestaan. De attributentabel begint op $1B00 en de patroontabel 
begint op $3800. 


20.1 Over lichtorgels 


10000 ORIGIN ($c000) 
10010 -- 

10020 $004a CONSTANT RdVrm 
10030 $004d CONSTANT WrtVrm 
10040 $0056 CONSTANT FílVrm 
10050 $0062 CONSTANT ChgClr 
10060 $0075 CONSTANT IniMlt 
10070 $00ba CONSTANT IscNte 
10080 $00d5 CONSTANT GtStck 
10090 $00d8 CONSTANT GtTrig 
10100 -—- 

10110 $f3e9 CONSTANT ForClr 
10120 $f3ea CONSTANT BacClr 
10130 $f3eb CONSTANT BdrClr 
10140 == 

10150 CODE 

10160 —- 

10170 :Teller ‚by $00 
10180 :Xpos ‚by $00 
10190 :Ypos ‚by $00 
10200 :Positie ‚wo $0000 
1o210 == 

10220 :VPeek 

10230 di 
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10240 
10250 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 


call #RdVrm 


call #FilVrm 
ei 
ret 


:CurPos 


ld hl,#&Xpos 
ld a,#0 

ld b‚a 

ld a, (#Ypos) 
sla a 

vi b 

sla a 

rl b 


add hl,be 
ld a,#15 
jp #VPoke 


:Plot 


ld a,#14 
jp #VPoke 


Cycle 


ld be, #$0300 
ld hl,#$0800 


:Cycle0 


call #VPeek 
cp #0 
IF na 
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10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 —- 


dec a 

call #/Poke 
FI 
inc hl 
dec c 


jpif na,#&Cycle0 
dec b 

jpif nz,#Cycle0 
ret 


10860 :Boing 


10870 call #CurPos 
10880 ld bc, #$0020 
10890 ld (#Positie),hl 
10900 or a 

10910 sbe hl,be 

10920 call #Plot 

10930 ld hl, (#Positíie) 
10940 dec hl 

10950 call #Plot 

10960 inc hì 

10970 inc hl 

10980 call #Plot 

10990 ld hl, (#Positie) 
11000 add hl,bce 

11010 jp #Plot 
11020 == 

11030 :Up 

11040 ld a, (#Ypos) 
11050 ep #1 

11060 retif z 

11070 dec a 

11080 ld (#Ypos),a 
11090 ret 

12100 =—- 


11110 :Right 


11120 ld a, (#Xpos) 
11130 ep #30 

11140 retif z 
11150 inc a 

11160 ld (#Xpos),a 
11170 ret 

11100. == 

11190 :Down 

11200 ld a, (#Ypos) 
11210 cp #22 

11220 retif za 
11230 inc ä 

11240 ld (#Ypos),a 
11250 ret 

11260 -—- 
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11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11390 
11400 
11410 
11420 
11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11680 
11690 
11700 
11710 
11720 
11730 
11740 
11750 
11760 
11770 
11780 


:Left 


ld a, (#Xpos) 


cp 


#1 


retif z 
dec a 


ld 


(#&Xpos),a 


ret 


:Joy 
ld 


a, #0 


call #GtStck 


ld 


b‚a 
#1 


z 
THEN 
call 


#Up 


#&Up 
tRight 


#Right 


Right 
#Down 


#HDown 


#Down 


HLeft 
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11790 IE 2 

11800 THEN 

11810 call #Left 
11820 FI 

11830 ld a,b 

11840 cp #8 

11850 ie 2 


11860 THEN 

11870 call #HLeft 
11880 call #Up 
11880 FI 


11900 ld a,#0 

11910 call #GtTrig 
11920 cp #SfF 

11930 Jpif z,#Boing 
11940 ret 

11950 == 

11960 :Init 

11970 call #IniMlt 
11980 ld a,#0 

11990 ld (#Teller),a 
12000 ld hl, #$0000 
12010 :Init0 

12020 ld a,(#Teller) 
12030 ld b,a 

12040 sla b 

12050 sla b 

12060 sla b 

12070 sla b 

12080 or b 

12090 ld b,#8 

12100 :Init1 

12110 call #VPoke 
12120 inc hl 

12130 djnz #Initi1 
12140 ld a, (#Teller) 
12150 inc a 

12160 ld (#Teller),a 
12170 cp #16 

12180 jpif na,#Init0 
12190 ld a,#0 

12200 ld be, #50 300 
12210 ld hl,#$03800 
12220 call #VFill 
12230 1e el 

12240 ld (#ForClr),a 
12250 ld (#BacClr),a 
12260 ld (#BdrClr),a 
12270 ld (#Xpos),a 
12280 ld (#Ypos),a 
12290 call #ChgClr 
12300 :Init2 
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12310 
12320 
12330 
12340 
12350 


call #IscNtce 
call #CurPos 
call #Cycle 
call #Joy 
jp #Init2 


12360 -- 
12370 ENDCODE 


‚: COO00 
„: CO04 
‚: CO08 
‚: COOC 
‚: CO10 
‚3 GCO14 
…: CO18 
.: CO1C 
„5 CO20 
.: CO24 
.: CO28 
‚3 CO2C 
.: CO30 
‚: CO34 
„s CO38 
‚… GO9C 
.: CO40 
‚: CO44 
‚: CO48 
‚: CO4C 
‚: C050 
‚: C0O54 
‚…s CO58 
3 CO5C 
‚: CO60 
… CO64 

: CO68 
‚A GO6G 
8 6070 
«s COT4 
…: C078 
‚: CO7C 
‚: CO80 
„: CO84 
.: CO88 

« CO8C 
.: CO90 
‚: CO94 
‚: CO98 

: CO9C 


.: COAO 
.: COA4 
.: COA8 
.: COAC 
.: COBO 

: COB4 


COB8 


5e GOBG 
.: COCO 
‚: COC4 
.: COC8 
… GOCC 
.: CODO 
«n GOD4 
.: COD8 
‚: CODC 


COEO 


.: COE4 
‚: COES8 
„3 COEC 
.: COFO 
.: COF4 
.: COF8 
.: COFC 
.: C100 
‚: C104 
ie CH08 
„…s €106 
.: C110 
2 C1M4 
…s CH48 
se IGHEG 
ss C120 
.s C124 
„: C128 
es C12C 
„… C13Q 
: C134 


C138 


“t C13C 


153 


„5 6140 
.: C144 
.: C148 
‚: C14C 
de OLO 

s C154 


be Tk SICT Gt RT ATA WE ie B nT EI Nd a . . . . . . 
ee we we we We wt WE we ee we we We We we We we We we We we we we vt we WU we we we we we We We We we We we We we Ve we we we 
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C005 
CO006 
CO09 
COOA 
CO0B 
COOC 
COOF 
CO10 
CO11 
CO12 
C015 
CO16 
CO17 
CO1A 
CO1C 
CO1D 
CO20 
C022 
C024 
C026 
C028 
CO2A 
Co2C 
CO2E 
CO030 
C032 
CO34 
CO35 
CO36 
CO37 
C038 
CO3B 
CO3C 
CO3E 
CO41 
CO43 
CO46 
CO49 
CO4C 
COAF 
CO51 
C054 


4D 


O1 
00 
CO 
Eg 
F3 
32 


00 


CO 


Co 


DI 
CALL $004A 
EI 


DI 
CALL $004D 
EI 


RET 

DI 

CALL $0056 

EI 

RET 

LD HL,$COO1 

LD A,‚$00 

LD B,‚A 

LD A, ($CO02) 
A A 


LD BC, $0800 
ADD HL, BC 
LD A,‚$0F 
JP $COOB 

LD A‚,$0E 
JP $COOB 

LD BC, $0300 
LD HL, $0800 
CALL $COO5 
CP $00 

JP 2,8CO58 
DEC A 


„: C158 CO 32 
.: C15C CD 62 
.: C160 BA 00 
„: C164 CO CD 
.: C168 CD BO 
.: C16C 5F C1 


CO55 
CO58 
C059 
COS5A 
COS5D 
COSE 
CO61 
C062 
C065 
CO068 
CO6B 
CO6C 
CO6E 
CO71 
CO74 
C075 
C078 
CO79 
CO7A 
CO7D 
CO80 
C081 
CO84 


.; CO087 


Se B od er Meek ten He NE vn ne ma tk en MA Se LR WTR OS A IT EK on ar Ot 
we We we we we We we we we we we Ve We We Be Ve we ve we vt we We we Ve we ve we ve we we we We we ve we we Vr we Ve we We we we ve Ve we Ve we Ve ve we we 


C089 
COBA 
CO8B 
COBE 
CO8F 
CO92 
CO94 
CO95 
CO96 
CO99 
CO9A 
CO9D 
CO9F 
COAO 
COA1 
COA4 
COA5 
COA8 
COAA 
CÒAB 
COAC 
COAF 
COBO 
COB2 
COB5 
COB6 
COB8 
COBB 


CO 
CO 


CALL $COOB 
INC HL 

DEC C 

JP NZ,$CO4C 
DEC B 

JP NZ,$CO4C 
RET 

CALL $CO17 
LD BC,$0020 
LD ($COO3), HL 
OR A 

SBC HL,BC 
CALL $CO41 
LD HL, ($COO03) 
DEC HL 

CALL $CO41 
INC HL 

INC HL 

CALL $CO41 
LD HL, ($COO3) 
ADD HL,BC 

JP $CO41 

LD A, ($CO02) 
CP $01 

RET Z 

DEC A 

LD ($CO02),A 
RET 

LD A, ($COO1) 
CP SIE 

RET 2 

INC A 

LD ($COO1),A 
RET 


LD A, ($CO02) 
CP $16 

RET Z 

INC A 

LD ($CO02),A 
RET 


LD A, ($COO1) 
CP $01 
RET Z 


DEC A 

LD ($COO1),A 
RET 

LD A,‚$00 
CALL $00D5 
LD B,A 

CP $01 


JP NZ, $COBE 
CALL $CO84 
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COBE 
COBF 
COC1 
COC4 
COC7 
COCA 
COCB 
COCD 
CODO 
COD3 
COD4 
COD6 
COD9 
CODC 
CODF 
COEO 
COE2 
COES 
COES8 
COE9 
COEB 
COEE 
COF1 
COF4 
COF5 
COF7 
COFA 
COFD 
COFE 
C100 
C103 
C106 
C109 
C10B 
C10E 
C110 
C113 
C114 
C117 
C119 
C11C 
CIIF 
C122 
C123 


‚; C125 


. . 
. . . . . . Ee ade he Be . er We MN IE . . . 

. . . e . . 
Dewi we we te ws Be we we ue we we mi ws esi ves ve wi we ams eens ns De er es ee Us Gewenste wa dt Be vins O4 Or PI we wees TG Ur Ge vr we 
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C127 
C129 
C12B 
C12C 
C12E 
C131 
C132 


CO 


LD A‚B 

CP $02 

JP NZ,$COCA 
CALL $CO84 
CALL $CO8F 
LD A‚B 

CP $03 

JP NZ,$COD3 
CALL $CO8F 
LD A,B 

CP $04 

JP NZ,SCODF 
CALL $CO8F 
CALL $COIA 
LD A‚B 

CP $05 

JP NZ, $COE8 
CALL $CO9A 
LD A‚B 

CP $06 

JP NZ,8COF4 
CALL $CO9A 
CALL $COA5 
LD A,B 

CP $07 

JP NZ,$COFD 
CALL $COAS5 
LD A,‚B 

CP $08 

JP NZ,$C109 
CALL $COAS 
CALL $CO84 
LD A,$00 
CALL $00D8 
CP SFF 

JP Z,$CO62 
RET 

CALL $0075 
LD A,$00 

LD ($COOO0),A 
LD HL,$0000 
LD A, ($CO00) 
LD B,‚,A 

SLA B 

SLA B 

SLA B 

SLA B 

OR B 

LD B,$08 
CALL $COOB 
INC HL 

DJNZ @C12E 


C134 3A 00 CO LD A,‚($CO00) 
INC A 


; C137 3C 
.; C138 32 00 CO LD ($CO00),A 
‚ C13B FE 10 CP $10 
‚> C1i3D C2 IF Ci JP NZ,$C11F 
.; C140 3E 00 LD A,$00 
.; C142 O1 00 03 LD BC,$0300 
; C145 21 00 08 LD HL, $0800 
.; C148 CD 11 CO CALL $CO11 
.; C14B 3E O1 LD A,$01 
.; C14D 32 E9 F3 LD ($F3E9),A 
‚; C150 32 EA F3 LD ($F3EA),A 
‚; C153 32 EB F3 LD ($F3EB),A 
.; C156 32 O1 CO LD ($COO1),A 
‚> C159 32 02 CO LD ($CO02),A 
‚… C15C CD 62 00 CALL $0062 
.; C1SF CD BA 00 CALL $00BA 
.; C162 CD 17 CO CALL $CO17 
.; C165 CD 46 CO CALL $CO46 
„‚; C168 CD BO CO CALL $COBO 
‚; C16B C3 5F C1 JP $C1ISF 
; C16E 44 LD B,H 


Deze veel kleuren-mode gilt om een veel kleuren-voorbeeld. Helaas heeft de 
MSX maar 15 verschillende kleuren, dus daar moeten we het dan maar mee 
doen. Zwart als achtergrond knalt altijd. Blijven er nog veertien kleuren over voor 
de effecten. We gaan namelijk een lichtorgel maken. 

Het principe is heel simpel: De kleuren verlagen tot transparant is bereikt. We 
maken 16 verschillende karakters, met zwart als achtergrond en als karakter 0. 
Als er een groter dan O-karakter (dus een kleur) op het scherm staat, verlagen we 
deze met één. 

In de tussentijd kunt u met de cursortoetsen aan het wandelen slaan, waarbij de 
spatiebalk voor een effect zorgt. Zien is geloven. Bekijk dit effect ook eens in een 
volledig verduisterde kamer.… 


20.2 De routines op een rij 
VPEEK, het video-adres in HL, en na terugkeer staat de data in de accumulator. 
VPOKE, het video-adres in HL, de data in de accumulator. 
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VFILL vult een stuk videogeheugen met een door u bepaalde waarde. De data in 
de accumulator, de lengte in BC en het beginadres van het videogeheugen in HL. 


CURPOS vindt een 16 bits-adres dat bij de X- en de Y-waarde van de cursor 
hoort. Het adres is het brandpunt van de routine. 


PLOT plaatst een brandpunt min l-waarde op het scherm. 


CYCLE isde routine die het scherm afzoekt op waarden groter dan nul. Zo ja, dan 
wordt de waarde verlaagd en teruggeplaatst. 


BOING verzorgt het effect. Uitgaande van het brandpunt wordt rondge-'"PLOT”. 
UP verplaatst het brandpunt indien mogelijk naar boven. 

RIGHT verplaatst het brandpunt indien mogelijk naar rechts. 

DOWN verplaatst het brandpunt indien mogelijk naar beneden. 

LEFT verplaatst het brandpunt indien mogelijk naar links. 


JOY leest de joystick (cursortoetsen) uit en onderneemt actie. Tot slot wordt naar 
de vuurknop gekeken voor een eventuele BOING. 


INIT initialiseert het scherm naar ‘veel kleuren’-mode. Er worden zestien kleuren- 


karakters aangemaakt, van transparant tot en met wit. Het scherm wordt gewist, 
nieuwe schermkleuren worden ingesteld en de hoofdroutine treedt in werking. 
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21 Sprites dus 


De videochip is in staat om 32 verschillende sprites tegelijkertijd op het beeld te 
plaatsen Sprites staan altijd vóór de achtergrond en er kunnen er maar 4 tegelijk 
naast elkaar staan. Elke volgende verdwijnt automatisch. 

Om de sprites aan te sturen, bestaat er een speciale sprite-attributentabel (zie afb. 
21.1) die vijf ingangen bevat. 

Eerst de verticale-of Y-positie waarin een waarde tussen Oen 255 de hoogte op het 
scherm aangeeft. 

Ten tweede de horizontale- of X-positie, wederom een waarde tussen 0 en 255 
voor de breedte op het scherm. 

Ten derde een wijzer naar de patroontabel. Vanaf het geadresseerde videogeheu- 
gen wordt de sprite-vorm opgehaald. (Zie figuur.) 

Het vierde byte zorgt voor de sprite-kleur (0-15) EN een zogenaamd early clock 
bit. Dit (zevende) bit zorgt ervoor dat de sprite 32 extra naar links wordt gezet. 


Sprite 0 $38060 Vorm 8 
$18060 $3801 
$3802 
-pesitie | esse 25005 
$3804 
Vornnunner | $1802 $3805 
, 
sari à EC Kleurcode $1803 Ù 5 $3807 
v-positie | sis  : 
Vormnunner | _s1B06 
EC / Kleurcode $1B07 
p É Vorm 255 
Sprite 31 
SIBZF 


EC / Kleurcode 


Afb. 21.1. Sprites op het beeld 
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In de VDP-registers bevinden zich ook nog een aantal speciale sprite-bits. In 


VDP-register | zorgt bit 0 voor de sprite-grootte: 0 = normaal / | = vergroot. 

In hetzelfde register zorgt bit 1 voor de sprite-maat. Zie de betreffende figuur in 

verband met het nu te gebruiken vormnummer. (0 = 8 x8/1 = 16 x 16) 
Sprite 1 


Sprite 2 


Sprite 3 


Sprite 4 


Afb. 21.2. Sprites ‘uitvergroot 


21.1 Sprites ontwerpen 


10000 ORIGIN ($c000) 

10030 == 

10020 $0047 CONSTANT WrtVDP 
10030 $004a CONSTANT RdVrm 
10040 $004d CONSTANT WrtVrm 
10050 $0056 CONSTANT FilVrm 
10060 $005c CONSTANT LDirVM 
10070 $006f CONSTANT Init32 
10080 $009f CONSTANT ChGet 
100390 $00a2 CONSTANT ChPut 
10100 $00ba CONSTANT IscNtce 
10110 $0156 CONSTANT KilBuf 
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10120 
10130 
10140 
10150 
10160 
10170 
10180 
10190 
10200 
10210 
10220 
10230 
10240 
10250 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 


10480 : 


10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 


$fJaf CONSTANT Lin32 
$f3dd CONSTANT CrsX 
$fJde CONSTANT CrsY 
$f3e0 CONSTANT RglSav 
$fcaT7 CONSTANT EscCnt 


CODE 
‘Help 
‘Teller 
‘Positie 


:Stuff 


: VPeek 
di 


$00 
800 
50000 


50,180,0,10 
50,200,0,11 
70,140,0,12 
70,160,0,13 
70,180,0,14 
70,200,0,15 


call #&RdVrm 


call #FilVrm 


ei 

ret 
: RVMove 

di 


call #LDirVM 


ei 
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10640 
10650 
10660 
10670 
10680 
106390 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10890 
10900 
10910 
10920 
10930 
10940 
10950 
10960 
10970 
10980 
10990 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11080 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
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ret 
:GetPos 
ld a,#0 
ld b‚a 
ld a, (#Teller) 
ld c‚a 
sla c 


ld hl,#$3800 
add hl,be 


ld (#Positie),hl 


ret 
:Hight 

ld a, (#CrsY) 
:Hight0 

cp #1 

retif z 


ld de, (#Positie) 


inc de 


ld (#Positie),de 


dec a 
jp #Hight0 
: Width 
ld a, (#CrsX) 
cp #9 
retif cs 


ld hl, (#Posíitie) 


ld de, #$0010 
add hl,de 


ld (#Positie),hl 


ret 
:GetLin 
call #Hight 
jp #Width 
:GetCol 
ld a, (#CrsX) 
dec a 
and #7 
ld b,#128 


11160 :GetCol0 


11170 
11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11390 
11400 
11410 
11420 
11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 


cp #0 

retif z 

srl b 

dec a 

jp #GetCol0 


:Part 


ld d,#3 


:Part0 


ld e,#8 

push hl 

ld hl, (#Positie) 
call #VPeek 

ince hl 

ld (#Positie),hl 
pop hl 

ld b,#128 


:Part1 


ld (#Help),a 
and b 
IF 2 
THEN 
ld a,#196 
ELSE 
ld a,#219 
FI 
call #VPoke 
inc hl 
srl b 
ld a, (#Help) 
dec e 
jpif nz,Part1 
ld be, #$0018 
add hl,be 
dec d 
jpif na,tPart0 
ret 


:Setup 


call #GetPos 
ld hl,#$1800 
call #Part 
ld hl,#$1900 
call #Part 
ld hl,#$1803 
call #Part 
ld hl,#$1908 
call #Part 
ret 


Plus 
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11680 


ld hl,#Teller 


11690 ine (hl) 
11700 :MakeOk 

11710 ld a, (hl) 
11720 and #63 
11730 ld (hl)‚a 
11740 sla a 

11750 sla a 

11760 ld b,#16 
11770 ld hl,#$1b02 


11780 :MakeOk0 


11790 call #VPoke 
11800 inc hl 

11810 inc hl 

11820 ine hl 

11830 ine hl 

11840 djna HMakeOk0 
11350 ret 

11869 -= 

11870 :Min 

11880 ld hl,#Teller 
11890 dec (hl) 
11900 jp #MakeOk 
41910 == 

11920 :Up 

11930 ld a, (#CrsY) 
11940 cp #1 

11950 retif 2 
11960 ld a,#$le 
11970 jp #ChPut 
11980 -- 

11990 :Down 

12000 ld a, (#CrsY) 
12010 cp #16 

12020 retif z 
12030 ld a,#$1f 
12040 jp #ChPut 
12060 == 

12060 :Left 

12070 ld a, (#CrsX) 
12080 cp #1 

12090 retif a 
12100 ld a,#$1d 
12110 jep #ChPut 
ter20 == 


12130 :Right 


12140 
12150 
12160 
12170 
12180 
12190 == 
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ld a, (#CrsX) 
cp #16 

retif z 

ld a,#$1c 
jp #ChPut 


12200 :Home 


12210 
12220 
12239 
12240 
12250 
WEEG e= 


call #GetPos 

ld a,#0 

1d be, #$0020 

ld hl, (#Positie) 
jp #VFill 


12270 :Invert 


12280 
12290 
12300 


call #GetPos 
ld hl, (#Positie) 
ld b,#32 


12310 :Invert0 


12320 
12330 
12340 
12350 
12360 
12370 
12380 -- 


call #VPeek 
xor #255 

call #VPoke 
ine hl 

djna #Invert0 
ret 


12390 :Pixel 


12400 call #GetPos 
12410 call #GetLin 
12420 call #GetCol 
12430 ld hl, (#Positie) 
12440 call #VPeek 
12450 xor b 

12460 jp #VPoke 

12470 -- 

12480 :JmpTab ‚wo #Plus 
12490 ‚wo #Min 
12500 ‚wo #Up 
12510 ‚wo #Down 
12520 ‚wo HLeft 
12530 ‚wo #Right 
12540 ‚wo #Home 
12550 ‚wo #Invert 
12560 ‚wo #Pixel 
12570 == 

12580 :KeyTab ‚by 43 
12590 ‚by 45 
12600 by $le 
12610 by $1f 
12620 by $1d 
12630 by $lc 
12640 by $0b 
12650 by 120 
12660 by 32 
12670 ‚by O 
12680 -- 

12690 :SelfMod 

12700 jp #SelfMod 
12710 == 
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12720 :Sprites 

12730 ld be, #$0040 
12740 ld de, #$1b00 
12750 ld hl,#Stuff 
12760 call #RVMove 
12770 ld a, (#Rg1Sav) 
12780 or #2 

12790 ld b‚,a 

12300 ld-c, #1 

12810 call #WrtVDP 
12820 ret 

12830 -- 

12840 :Init 

12850 ld a,#32 
12860 ld (#Lin32),a 
12870 call Init32 
12880 ld a,#1 

12890 ld (#CrsX),a 
12900 ld (#CrsY),a 
12910 call #Sprites 
12920 :Init0 

12930 call #Setup 
12940 call #KilBuf 
12950 :Init1 

12960 call #IscNtce 
12970 ld a,#0 

12980 ld (#EscCnt),a 
12990 call #ChGet 
13000 ld (#Help),a 
13010 ld hl,#KeyTab 
13020 ld de, #JmpTab 
13030 :Init2 

13040 ld a, (hl) 
13050 cp #0 

13060 jpif z,#Init1 
13070 ld a, (#Help) 
13080 ep (hl) 

13090 IF z THEN 


13100 ld a,(de) 

13110 ld (#SelfMod+1),a 
13120 inc de 

13130 ld a,(de) 

13140 ld (#SelfMod+2),a 
13150 call #SelfMod 
13160 jp #Init0 

13170 FI 


131380 ine hl 
13190 inc de 
13200 inc de 
13210 jp #Init2 
13220: == 

13230 ENDCODE 
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.: COOO0 
‚3 COO4 
.: COO08 
.% COOC 
‚: CO10 
‚: CO14 
.: CO18 
‚: GCO1C 
.: CO20 
.: CO24 
.: CO28 
‚: CO2C 
st GOIN 
‚: CO34 
‚: CO38 
‚ COC 
.: CO40 
‚: CO44 
.: CO48 

: CO4C 


C050 


“1 CO54 
: C058 


„1 CO5C 


: CO60 

: CO64 
‚: CO68 
.: CO6C 
‚: CO70 
je GOTTA 
‚: CO78 
‚: CO7C 
‚: 6080 
‚: CO84 
.: CO88 
‚: GO8C 
‚: CO90 
‚: CO94 
.: CO98 
.: CO9C 
‚3 COAO0 
‚…: COA4 
.: COA8 
… GOAC 
.: COBO 

: COB4 


COB8 


‚: COBC 
‚: COCO 
‚3 (COC4 

: COC8 


OND NNDN: «ee eee 


Ee SR 


„ COCC 
‚: CODO 
‚: COD4 
.: COD8 

« CODC 


COEO 


.: COE4 
‚…: COES 
…s COEC 
‚: COFO 
.: COF4 
‚: COF8 
… COFC 
.: C100 
‚: C104 
.: C108 
‚3 C10C 
.: C110 
5 GELE 
‚5 G118 
‚CAA 
.: C120 
.: C124 
‚: C128 
…s Ci26 
.: C130 


C134 


„3 G439 
‚: C13C 
.: C140 
„: C144 
‚: C148 
.s C14C 
‚ C150 
.… C154 
ss C158 
„. C15C 
5 6460 
.: C164 


C168 


erk je 
.…: C170 
.: C174 
CIT 8 
ek C17C 
zie G2RO 
‚: C184 
…… 188 
« C186 
an 190 
‚5 C194 


ve 
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C198 


“: C19C 


ne GAO 
…s GiA4 
5 GLAS 
 CLAG 
‚: C1B0 
‚: C1B4 
‚: C1B8 
…£ C1BC 
‚5 C1CO0 
‚3 C1C4 
… C1C8 
ss GAGG 
‚3 C1D0 
: C1D4 


CO44 
CO45 
CO48 
CO49 
CO4A 
CO4B 
CO4E 
CO4F 
C050 
CO51 
CO54 
CO55 
CO56 
CO57 
CO5A 
CO5B 
CO5C 
COSE 
CO5F 
C062 
C063 
CO65 
CO67 
CO69 


.; CO6B 


CO6D 
CO6F 
CO71 


; CO73 


CO75 


<5 GOTT 


. . . . . on eni Bie 10 KT EE 
we we we we we We we We we Ve we wet we Ue we Ve we We we Ut we we we Ve we We we We we we we Ve we 
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CO7A 
CO7B 


4A 


4D 


56 


00 


00 


00 


00 


CO 


ii …: C1D8 
El arn Eg a G1DC 
ie et se CRD 
RT .: C1E4 
in „… CiE8 
nt si CLRC: 
Ee le „OIO 
U u CiP4 
Ree ae GIPS 
TEL ‚3 C1FC 
Ge .: C200 
is …: G204 
eN „5208 
A RN … C20C 
ee : C210 
DI 

CALL $004A 

EI 

RET 

DI 

CALL $004D 

EI 

RET 

DI 

CALL $0056 

EI 

RET 

DI 

CALL $005C 

EI 

RET 

LD A,‚,$00 

LD B,A 

LD A‚($COO1) 

LD C‚,A 

SLA C 

RL B 

SLA C 

RL B 

SLA C 

RL B 

SLA C 

RL B 

SLA C 

RL B 

LD HL,$3800 

ADD HL,BC 


LD ($COO2),HL 


WE ID ETT Ar OE ps TOS A OE ont jr Pijn IS je at 0 Dr Re (U 8 wt ok 
DE dd 


COTE 
CO7F 
CO82 
CO84 
C085 
C089 
CO8A 
CO8E 
CO8F 
CO92 
CO095 
CO97 
C098 
CO9B 
COJE 
CO9F 
COA2 
COA3 
COA6 
COA9 
COAC 
COAD 
COAF 
COB1 
COB3 
COB4 
COB6 
COB7 
COBA 
COBC 
COBE 
COBF 
COC2 
COC5 
COC6 
COC9 
COCA 
COCC 
COCF 
CODO 
COD3 
COD5 
COD8 
CODA 
CODD 
CODE 
COEO 
COE3 
COE4 
COE7 
COEA 
COEB 


Co 


CO 
CO 


CO 


CO 
CO 
CO 
CO 


CO 


CO 
00 


CO 
CO 


RET 

LD A, ($F3DC) 
CP $01 

RET Z 

LD DE, ($COO2) 
INC DE 

LD ($COO02),DE 
DEC A 

JP $COB82 

LD A‚($F3DD) 
CP $09 

RET C 

LD HL, ($CO02) 
LD DE,$0010 
ADD HL,DE 

LD ($COO2), HL 
RET 

CALL $CO7F 
JP $CO92 

LD A,‚($F3DD) 
DEC A 

AND $07 

LD B,$80 

CP $00 

RET Z 

SRL B 

DEC A 

JP $COB1 

LD D,$08 

LD E‚$08 
PUSH HL 

LD HL, ($COO2) 
CALL $CO44 
INC HL 

LD ($COO2),HL 
POP HL 

LD B,$80 

LD ($COOO),A 
AND B 

JP NZ,$COD8 
LD A,‚$C4 

JP $CODA 

LD A,$DB 
CALL $CO4A 
INC HL 

SRL B 

LD A,‚($CO00) 
DEC E 

JP NZ,$COCC 
LD BC,$0018 
ADD HL,BC 
DEC D 
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COEC 
COEF 
COFO 
COF3 
COF6 
COF9 
COFC 
COFF 
C102 
C105 
C108 
C10B 
C10E 
C1OF 
C110 
C112 
C113 


; C115 


C117 


; C2119 


C11C 


; C11F 


C120 
C121 
C122 


‚ C123 


C125 
C126 
C129 
C12A 
C12D 
C130 
C132 
C133 
C135 
C138 
C13B 
C13D 
C13E 
C140 
C143 
C146 
C148 
C149 
C14B 
C14E 
C151 
C153 
C154 
C156 
C159 
C15C 


1B 
CO 


CO 


C1 
F3 


00 
F3 


00 
F3 


00 
F3 


00 
CO 


JP NZ,$COBC 
RET 


CALL $COSC 
LD HL,$1800 
CALL $COBA 
LD HL,$1900 
CALL $COBA 
LD HL,$1808 
CALL $COBA 
LD HL,$1908 
JP $COBA 

LD HL,$COO1 
INC (HL) 

LD A, (HL) 
AND $3F 

LD (HL),A 
SLA A 

SLA A 

LD B,$10 

LD HL,$1B02 
CALL $CO4A 
INC HL 

INC HL 

ING HL 

INC HL 

DJNZ @C11C 
RET 

LD HL, $COO1 
DEC (HL) 

JP $C1OF 
LD A, ($F3DC) 
CP $01 

RET 2 

LD A,$1E 

JP $00A2 

LD A, ($F3DC) 
CP $10 

RET 2 

LD A,$1F 

JP $00A2 

LD A, ($F3DD) 
CP $01 

RET 2 

LD A,$1D 

JP $00A2 

LD A, ($F3DD) 
CP $10 

RET 2 

LD A,$1C 

JP $00A2 
CALL $COS5C 
LD A,$00 


Bte Jet. Mie IK) HEL AE ie LE EE Te A Od EA RME PTR ON INCA Le et OE terre en HR TR IE RE Dei 
EE ee dd 


C15E 
C161 
C164 
C167 
C16A 


; C16D 


C16F 


‚ C172 


C174 
C177 
C178 
C17A 
C17B 
C17E 
C181 
C184 
C187 
C18A 
C18B 
C18E 
C18F 
C190 
C192 
C193 
C194 
C196 
C197 
C198 
C199 
C19A 
C19B 
C19C 
C19D 
C19E 
C19F 
C1A0 
C1AI 
C1A2 
C1A4 
C1A5 
C1A6 
C1AT 
C1AB 
C1AA 
C1AD 
C1B0 
C1B3 
C1B6 
C1B9 
C1BC 


; C1BE 


iF 


LD BC,$0020 
LD HL, ($COO2) 
JP $CO50 
CALL $COS5C 
LD HL, ($COO2) 
LD B,$20 
CALL $CO44 
XOR SFF 

CALL $CO4A 
INC HL 

DJNZ @C16F 
RET 

CALL $CO5C 
CALL $COA3 
CALL $COA9 
LD HL, ($COO2) 
CALL $CO44 
XOR B 

JP $CO4A 

DEC BC 

POP BC 

LD H,‚$C1 

DEC L 

POP BC 

JR C,@C157 
LD B,E 


LD A,B 

JR NZ,@C1AA 
JP $C1AA 

LD BC,$0040 
LD DE,$1B00 
LD HL,$COO4 
CALL $CO56 
LD A,‚($F3E0) 
OR $02 

LD B,A 
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C1BF 
C1C1 
C1C4 
C1C6 
C1C9 
C1CC 
C1CE 
C1D1 
C1D4 
C1D7 
C1DA 
C1DD 
C1EO 
C1E2 
CIES5 
C1E8 
CIEB 
CIEE 
C1F1 
C1F2 
C1F4 
C1F7 
C1FA 
C1FB 
CIFE 
CIFF 
C202 
C203 
C204 
C207 
C20A 
C20D 
C20E 
C20F 
C210 


u BEC on IRE lk fe aje ve MRC ORK) . . . . E © PR ie . . . 
we ee et we te et een ae te ee ee ete et ee en te et ne te ee ee en ee en ee ee ee 


Fi 


C1 


LD C,‚,$01 

JP $0047 

LD A,$20 

LD ($F3AF),A 
CALL $006F 
LD A,$01 

LD ($F3DD),A 
LD ($F3DC),A 
CALL $C1AD 
CALL $COFO 
CALL $0156 
CALL $00BA 
LD A,‚$00 

LD ($FCA7),A 
CALL $009F 
LD ($CO00),A 
LD HL,$C1AO 
LD DE, $C18E 
LD A, (HL) 

CP $00 

JP Z,$C1DD 
LD A, ($CO00) 


LD ($C1AB),A 
INC DE 

LD A, (DE) 

LD ($C1AC),A 
CALL $C1AA 
JP $C1D7 

INC HL 

INC DE 

INC DE 

JP $C1F1 


Voordat u iets met sprites kunt doen, moet u wel aan de sprite-vormen kunnen 
komen. Vandaar als voorbeeld een sprite-editor. Ten eerste ziet u hoe u de sprites 
op beeld krijgt, maar bovenal hoe u 16 x 16-sprites (Niemand die 8 x 8-sprites 
maakt. Of wel soms?) kunt gebruiken. 

Vanzelfsprekend kunt u deze zelf ontworpen sprites ook opslaan. Dit gaat vanuit 
BASIC door middel van een video-SAVE-opdracht. Zo'n weggeschreven sprites- 
set kunt u naderhand met een video-LOAD-commando weer binnenhalen. 


De sprite-editor lijkt nogal wat op de karakter-editor. Het zal dus inmiddels voor 
u geen enkel probleem opleveren om uit te zoeken hoe het programma werkt. 
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21.2 De routines op een rij 


STUFF is een tabel voor alle sprite-benodigdheden. Erg handig omdat u met een 
RAM /video-kopieerinstructie meteen alle sprites initialiseert. 


VPEEK, u weet wel. 

VPOKE, dito. 

VFILL, u welbekend. 

RVMOVE, dezelfde instructie als bij het hires-voorbeeld. 


GETPOS berekent de plaats van de huidige sprite-informatie. Dit komt neer op 
een ‘sprite maal 32’-berekening. 


HIGHT calculeert een te adresseren patroonpositie in, rekening houdend met de 
Y-waarde van de cursor. 


WIDTH kijkt naar de X-waarde van de cursor om, indien u in het derde of vierde 
sprite-blokje edit, 16 extra bij te tellen. 


GETLIN kijkt welk byte uit het patroon van 16 x 2 bytes thans wordt bewerkt. 


GETCOL kijkt welk bit uit het byte thans wordt bewerkt. We kijken ‘slim’ naar de 
X-waarde van de cursor. 


PART zet een 8 x 8 bit-matrix op het scherm. Te vergelijken met SETUP uit de 
karakter-editor. 


SETUP zet een 16 x 16-matrix op het scherm, gebruik makend van het feit dat 
een 16 x 16 sprite uit vier 8 x 8-blokken bestaat. 


PLUS verhoogt de nu bekeken sprite met één. Na afloop wordt voor de 16 
voorbeeld-sprites de nieuwe sprite-pointer aangemaakt. 


MIN verlaagt de nu bekeken sprite met één. 


UP verplaatst indien mogelijk wordt de cursor één locatie naar boven. 
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DOWN verplaatst indien mogelijk de cursor één locatie naar beneden. 
LEFT verplaatst indien mogelijk de cursor één locatie naar links. 
RIGHT verplaatst indien mogelijk de cursor één naar rechts. 

HOME wist de inhoud van de sprite (alles op 0). 


INVERT inverteert het geadresseerde sprite-patroon. Alle O-bits worden geset en 
andersom. 


PIXEL berekent de pixelpositie van de cursor en XOR-t deze waarde met de 
desbetreffende bitadressering. Pixel aan wordt pixel uit en andersom. 


JMPTAB bevat de adressen die worden aangeroepen als er op een juiste toets 
wordt gedrukt. 


KEYTAB bevat de waarden die horen bij een commandotoets op het toetsen- 
bord. Een KEYTAB-adressering is niet meer dan een pointer naar de vorige tabel. 


SELFMOD is een CALL-routine die door de key scan wordt veranderd als er op 
een juiste toets wordt gedrukt. 

Stel dat de PLUS-routine moet worden aangeroepen. Het low-byte van PLUS 
komt van KEYTAB en wordt op SELFMOD + 1 geplaatst. Het high-byte van 
PLUS komt van KEYTAB + l en wordt op SELFMOD + 2 geplaatst. 


SPRITES initialiseert de gebruikte sprites. Ook worden de sprites op 16 x 16- 
grootte ingesteld. 


INIT stelt de juiste schermbreedte en scherm-mode in, waarna (met CTRL/ 
STOP-check) de juiste commando’s worden bepaald enz. 
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De software 


Als ontwikkelings-software bieden we u SPEEDTYPER en HERBYMON aan. 
Deze machinecodelisting-verwerker en machinecode-monitor kunt u aan de hand 
van de listings invoeren. 

De SPEEDTYPER heeft u nodig om de HERB YMON te kunnen invoeren. Dit is 
expres zo gedaan: HERB YMON in BASIC-DATA-regels zou ruim 40% groter 
worden dan een SPEEDTYPER plus HERBYMON. Tevens zorgt de SPEED- 
TYPER voor een invoercontrole. 


De HERBYMON gebruikt u onder andere om de voorbeelden uit dit boek te 
kunnen proberen en eventueel ook om eigen machinecode te ontwikkelen. De 
HERBYMON beslaat het geheugengebied $A000-$C000 en het startadres is 
49059 decimaal. U krijgt ook nog een startprogramma voor de HERBYMON. 
Als u een diskdrive heeft, zou u dit programma als AUTOEXEC.BAS op de schijf 
kunnen zetten. Dit heeft tot gevolg dat de monitor automatisch start. 


Van beide programma’s volgt de handleiding na de listing. 
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22 De SPEEDTYPER 


22.1 De listing 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
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REM ®kokokotokokokookokkkkk 


REM **x SPEEDTYPER **%* 
REM Hotrod 


SCREEN1 : WIDTH30 

CLEAR200, &HS9FFF 
CR$=CHR$(13) 
LF$=CR$+CHR$ (10) 
BG$=CR$+CHR$ (27 ) +CHR$(&HAD ) 
CLS 

PRINT "short ” 
PRINT" ***k SPEEDTYPER **x” 
PRINT" %ktoktor krent” 
PRINT 

INPUT“ BEGIN-ADRES" ; BA 
IFHEX$ (BA) <HEX$ (&HAO000 ) THEN1150 
INPUT" EIND-ADRES" ;EA 
IFHEX$(EA) <HEX$(BA)THEN1170 


PRINT 

PRINT" BEGIN-ADRES - &h";HEX$(BA) 
PRINT" EIND-ADRES -— &h";HEXS$(EA) 
PRINT 

INPUT"IS DIT OK? (j/n)";JN$ 
IFJN$<>" 5" THENRUN 


REM kok 

CLS 

PRINT" **x SPEEDTYPER OPTIES %***” 
PRINT 


PRINT" (1) — 'LEEG POKEN' " 
PRINT" (2) — DATA BEKIJKEN" 
PRINT" (3) — DATA INVOEREN" 
PRINT" (4) — DATA LOADEN" 
PRINT" (5) — DATA SAVEN" 
PRINT" (6) — STOPPEN" 

PRINT 


1390 PRINT" <MAAK UW KEUZE>" 
1400 IP$=INKEY$ 

1410 IFIP$<“1"ORIPS$>"6"THEN1400 
1420 CLS 

1430 ONVAL(“+"+IP$)GOTO1540,1840,2270,1640,1740,1470 
1440 : 

1450 REM **x 

1460 : 

1470 PRINT" **XSTOPPEN**«" 

1480 INPUT"ZEKER WETEN? (j/n)";JN$ 
1490 IFJN$="j"THENRUN 

1500 GOTO1290 

1540 £ 

1520 REM **x 

1530 : 

1540 PRINT" *kx’LEEG POKEN’ xxx” 
1550 INPUT"ZEKER WETEN? (j/n)";JN$ 
1560 IFJN$<>“j"THEN1290 

1570 FORT=BATOEA 

1580 : POKE(T),0 

1590 NEXT 

1600 GOTO1290 

1610 : 

1620 REM **x* 

1630 : 

1640 PRINT" ***DATA LOADEN**xX" 

1650 INPUT"ZEKER WETEN? (j/n)";JN$ 
1660 IFJN$<>"j"THEN1290 

1670 PRINT 

1680 INPUT“FILENAAM: “;N$ 

1690 BLOADN$ 

1700 GOTO1290 

1710. 

1720 REM **x 

1730 : 

1740 PRINT" **X*DATA SAVEN%*X" 

1750 INPUT"ZEKER WETEN? (j/n)";JN$ 
1760 IFJN$<>"j"THEN1290 

1770 PRINT 

1780 INPUT"FILENAAM: “;N$ 

1790 BSAVEN$S, BA, EA 

1800 GOTO1290 

1810 : 

1820 REM **x 

1830 : 

1840 PRINT" ***DATA BEKIJKEN***" 
1850 INPUT"ZEKER WETEN? (j/n)";JN$ 
1860 IFJN$<>"j"THEN1290 

1870 PRINT 

1880 INPUT" (p)RINTER / (s)CHERM";DV$ 
1890 INPUT"ZEKER WETEN? (j/n)";JN$ 
1900 IFJN$<>"j"THEN1890 


1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 


PRINT 

PRINT" SPATIEBALK=PAUZE" 
PRINT" CURSOR=OPTIES! * 
PRINT 

PRINT" <SPATIEBALK>" 
IFSTRIG(O)=0THEN1960 
CLS 

NA=BA 

DO$="SPEEDDUMP VAN "+HEX$(BA)+" TOT 
GOSUB 2140 
DOS=HEXS$ (NA) +": 
GOSUB2180 : D1 =CK 
DO$=DO$+" " 
GOSUB2180 : D2=CK 
DO$=DO8+" " 


CKS$=HEX$(D1+D2) : IFLEN( CKS) =1 THENCKS$= 


IFLEN(CKS) =2THENCK$= "0 "+CK$ 
DO$=DO$+CK$+CRS 

GOSUB2140 
AB=STICK(O) : IFAB<>OTHEN1290 
IFNA<EATHEN2010 

GOTO1290 


2130 : 


2140 
2150 
2160 
2170 
2180 


2190 : 
2200 : 
2210 : 
2220 : 


2230 


PRINTDOS 
IFDV$="p"THENLPRINTDOS 

IF STRIG(O)THEN2160 

RETURN 

CK=0 : FORNA=NATONA+3 
AD$=HEXS$( PEEK (NA) ) 
IFLEN(ADS$)=iTHENAD$="0"+AD$ 
DO$=DO$+AD$ 

CK=CK+PEEK (NA) 

NEXT : RETURN 


2240 : 


2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
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REM *kx 


PRINT" ***DATA INVOEREN" 

INPUT" ZEKER WETEN? (j/n)";JN$ 
IFJN$<>"j"THEN1290 

PRINT 

INPUT" INVOER-ADRES " ; TA 
IF(TA<BA)OR(TA>EA) THEN2310 

PRINT 

PRINT" BEGIN-ADRES - &h";HEX$(BA) 
PRINT" INVOER-ADRES — &h";HEXS(TA) 
PRINT" EIND-ADRES - &h";HEXS$(EA) 
PRINT 

INPUT"IS DIT OK? (j/nm)";JNS$ 
IFJN$="n"THEN2300 

PRINT" 'X’=OPTIES" 

PRINT 

PRINT” <SPATIEBALK> " 


“+HEX$ (EA) +LFS 


“00"+CKS$ 


2430 
2440 
2450 
2460 
2470 
2480 
24390 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 


2710 : 
2720 
2130 
2740 : 


2750 
2760 
2770 
2780 
2790 


2800 : 


2810 
2320 
2830 


IFSTRIG(O)=0OTHEN2430 
IFSTRIG(O)THEN2440 

CLS: I$=INKEY$ 

NA=TA 

DOS=HEX$(NA)+": " 
PRINTBGS; DOS; CHR$ (95) ; 
I$S=INKEY$: IFI$=""THEN2490 
ASzASC(I$) 

IFAS=120THEN1 290 
IF(AS=127)OR(AS=8) THEN2590 
IF(AS<48)OR(AS>102)THEN2490 
IF(AS>57 )AND(AS<96 ) THEN2490 
IFLEN(DOS)=13THENIS$=IS+" " 
IFLEN(DOS)=22THENI$=IS+" " 
DO$=DO$+I$: IFLEN(DO$) =27 THEN2640 
GOTO2480 

IFLEN(DOS) <7THEN2490 
DOS=LEFT$(DO$, LEN (DOS) -1 ) 
IFLEN(DOS$) =14THENDOS=LEFT$(DO$, 13) 
IFLEN(DO$) =23THENDOS=LEFT$( DOS, 22 ) 
GOTO2480 

PRINTBG$ ; DO$ 
P1$=MID$(DO$, 7,8) 
P2$=MID$(DO$, 16,8) 
CKS=MID$(DO$, 25,3) 
PT$=Pi$+P2$+"  " 

CK=0 

FORT=0TO7 
PB$="&h"+LEFT$(PT$, 2) 
PT$=RIGHT$S(PT$, LEN(PT$) -2) 
PW(T)=VAL (PBS) 

CK=CK+PW(T) 

NEXT 
IFCK=(VAL("&h"+CK$) ) THEN2780 
PRINT"CHECKSUM ERROR!" : GOTO2470 
FORT=OTO7 

POKENA, PW(T ) 

NA=NA+1 

NEXT 

IFHEXS$ (NA) <HEX$ (EA) THEN2470 
GOTO1290 


22.2 Werken met de SPEEDTYPER 


Het moet natuurlijk geen enkel probleem hebben opgeleverd om de SPEEDTY- 
PER in te typen. Laten we gemakshalve meteen maar aannemen dat u dit foutloos 
heeft gedaan. 
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U start de SPEEDT YPER vanuit BASIC met het RUN-commando. Eerst wordt 
om een beginadres gevraagd. Dit is in ons geval het beginadres van de HERBY- 
MON, te weten &HA000. 

Vervolgens een eindadres. Bij het intypen van de HERBYMON moet dit 
&HCOO0O zijn. (&HA000 - &HCO00 dus) 


Na het J-antwoord komt u in het hoofdmenu terecht. U kunt hier kiezen uit zes 
opties: 


ID) ‘LEEG POKEN' 

2) DATA BEKIJKEN 
3) DATA INVOEREN 
4) DATA LOADEN 
5) DATA SAVEN 

6) STOPPEN 


Door op de corresponderende cijfertoets te drukken, selecteert u de optie. Vervol- 
gens wordt u door middel van vraag en antwoord op uw wenken bediend. 


‘LEEG POKEN’ 


Dit ‘leeg poken’ doet u eigenlijk maar één keer: Aan het begin van uw marathon- 
intypsessie. 

Het gevolg is dat het toegewezen geheugengebied op 0 wordt gezet. Dit heeft als 
voordeel dat u later gemakkelijk kunt opzoeken waar u de vorige keer was 
gebleven. 


DATA BEKIJKEN 


U kunt nu het toegewezen geheugengebied gaan nakijken. Vanaf het beginadres 
tot aan het eindadres kunt u het geheugen bekijken in het speciale SPEEDTY- 
PER-formaat, dus met checksum.U kunt de data niet alleen op het scherm 
bekijken; u kunt de data ook naar de printer sturen. Komt misschien nog wel eens 
van pas bij een moeilijk te vinden intypfout… 

Met de spatiebalk pauzeert u en het indrukken van een cursortoets brengt u weer 
in het hoofdmenu. 
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DATA INVOEREN 


In feite de belangrijkste optie. U kunt nu aan de hand van een SPEEDTYPER- 
listing een programma (De HERBY MON dus) invoeren, terwijl de invoer auto- 
matisch wordt gecontroleerd. Fouten maken wordt haast onmogelijk, op voor- 
waarde dat u wel de juiste adressen in de gaten houdt! 


Er wordt om een invoeradres gevraagd. Dit is het beginadres van het toegewezen 
geheugengebied als dit uw allereerste poging wordt. In een ander geval dient het 
laatst getypte adres als invoeradres, dus het adres waar u de vorige keer bent 
opgehouden. 


Nog even een kleine controle en daar gaat u (met de X-toets komt u weer in het 
hoofdmenu terecht). 

U neemt in dit geval de HERBYMON-listing en u zoekt naar het adres uit deze 
listing dat overeenkomt met het adres dat u links in beeld ziet. Gevonden? Dan 
typt u de regel netjes na. ('BS° als u een foutje maakt!) 

Als u de regel foutloos heeft overgenomen, wordt deze geaccepteerd en krijgt u het 
volgende adres om in te vullen. Als u een fout maakt moet u na een ‘CHECK SUM 
ERROR! de regel nog eens proberen. 


Dit gaat net zolang door tot de hele listing is ingevoerd, of totdat u er genoeg van 
heeft. In het laatste geval drukt u op de “X'-toets. Vergeet u nu vooral niet om de 
ingevoerde data ‘weg te SAVEn’ met de gelijknamige optie! 


DATA LOADEN 


U kunt nu het gedeelte binnenhalen waaraan u de vorige sessie hebt gewerkt. 
Misschien om het af te maken, of om een eventuele adresfout te verwijderen. Denk 
om de juiste bestandsnaam! 


DATA SAVEN 


Vlak voordat u stopt met deze intyp-scssie, of gewoon voor de zekerheid, kunt u 
de thans ingevoerde data opslaan op cassette en/of diskette. U geeft een gewenste 
file-naam, opslaan en klaar! 


STOPPEN 
Einde van het programma.… 
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23 De HERBYMON 


23.1 De programmalisting 


SPEEDDUMP VAN A000 TOT CO00 


AO000: 
A008: 
AO10: 
A018: 
AO20: 
A028: 
A030: 
A038: 
AO40: 
A043: 
A050: 
A058: 
A060: 
A063: 
A070: 
A078: 
A080: 
A088: 
A0O90: 
A098: 
AOAO: 
AOA8: 
AOBO : 
AOB8: 
AOCO: 
AOC8: 
AODO: 
AODB8: 
AOEO: 
AOE3: 
AOFO: 
AOF3: 
A100: 
A108: 
A110: 
A113: 
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4EAF503E 
432CC23E 
4243292C 
43204243 
20423E44 
3E4C4420 
524C4341 
41462C41 
44442048 
3E4C4420 
43293E44 
433E494E 
44454320 
20432CC1 
413E444A 
3E4C4420 
3E4C4420 
2C413E49 
453E494E 
44454320 
20442CC1 
3E4A5220 
4420484C 
4C442041 
293E4445 
3E494E43 
45432045 
452CC13E 
4A52204E 
4C442048 
4C442028 
20292C48 
4320484C 
20483E44 
3E4C4420 
4A441413E 


4C442042 
4C442028 
413E494E 
3E494E43 
45432042 
422CC13E 
3E455820 
46273E41 
4C2C4243 
412C2842 
45432042 
4320433E 
433E4C44 
3E525243 
4E5A20C3 
44452002 
28444529 
4E432044 
4320443E 
443E4C44 
3E524C41 
C33E4144 
2C44453E 
20284445 
43204445 
20453E44 
3E4C4420 
5252413E 
SA2CC33E 
4C2CC23E 
C2202020 
4AC3E494E 
3E494E43 
45432048 
482CC13E 
4AA52205A 


21D 
247 
1FO 
200 
1CE 
25B 
21D 
1EO 
1ED 
1C5 
1D8 
1FC 
1FD 
275 
298 
265 
1C8 
1E9 
IFF 
1FE 
26E 
280 
1EB 
1CE 
1DC 
IFF 
1DB 
293 
291 
270 
1FA 
1DE 
20F 
1DA 
261 
21A 


A120: 
A128: 
A130: 
A138: 
A140: 
A148: 
A150: 
A158: 
A160: 
A168: 
A170: 
A178: 
A180: 
A188: 
A190: 
A198: 
A1 AO: 
A1A8: 
A1BO: 
A1B8: 
A1CO: 
A1C8: 
A1DO: 
A1D8: 
ALEO: 
A1E3S: 
A1FO: 
A1F8: 
A200: 
A208: 
A210: 
A218: 
A220: 
A228: 
A230: 
A238: 


2CC33E41 
4C2C484C 
484C2C28 
20293E44 
AC3E494E 
44454320 
204C2CC1 
3E4A5220 
3E4C4420 
3E4C4420 
2020292C 
43205350 
2028484C 
43202848 
44202848 
3E534346 
432CC33E 
484C2C53 
20412C28 
20293E44 
5O3E494E 
44454320 
20412CC1 
3E4C4420 
4C442042 
4420422C 
20422C45 
422C483E 
2C4C3E4C 
28484C29 
422C413E 
2C423E4C 
433E4C44 
3E4C4420 
4C442043 
4420432C 


44442048 
3E4C4420 
C2202020 
45432048 
43204C3E 
4C3E4C44 
3E43504C 
4E432CC3 
53502CC2 
28C22020 
413E494E 
3E494E43 
293E4445 
4C293E4C 
4C292CC1 
3E4A5220 
41444420 
503E4C44 
C2202020 
45432053 
4320413E 
413E4CA4 
3E434346 
422C423E 
2C433E4C 
443E4C44 
3E4C4420 
4C442042 
4420422C 
3E4C4420 
4C442043 
44204320 
20432C44 
432C453E 
2C483E4C 
4AC3E4C44 


A240: 
A248: 
A250: 
A258: 
A260: 
A268: 
A270: 
A278: 
A280: 
A288: 
A290: 
A293: 
A2A0: 
A2A3: 
A2BO: 
A2B8: 
A2CO: 
A2C8: 
A2D0: 
A2D8: 
A2EO: 
A2E8: 
A2F0: 
A2F8: 
A300: 
A308: 
A310: 
A318: 
A320: 
A328: 
A330: 
A338: 
A340: 
A343: 
A350: 
A358: 
A360: 
A363: 
A370: 
A378: 
A380: 
A383: 
A390: 
A393: 
A3A0: 
A3A8: 
A3BO: 
A3B8: 
A3CO: 
A3C8: 
A3DO: 
A3D8: 


20432C28 
4C442043 
4420442C 
20442C43 
442C443E 
2C453E4C 
483E4C44 
3E4C4420 
4C293E4C 
413E4C44 
3E4C4420 
4C442045 
4420452C 
20452C48 
452C4C3E 
2C28484C 
20452C41 
482C423E 
2C433E4C 
443E4C44 
3E4C4420 
4C442048 
4420482C 
3E4C4420 
4AC44204C 
44204C2C 
204C2C44 
4C2C453E 
2C4B3E4C 
4CIE4C44 
484C293E 
2C413E4C 
4C292C42 
2848429 
44202848 
3E4C4420 
2C453E4C 
4C292C48 
28484C29 
414C543E 
484C292C 
20412C42 
412C433E 
2C443E4C 
453E4C4A4 
3E4C4420 
4C442041 
293E4C44 
3E414444 
3E414444 
3E414444 
3E414444 


484C293E 
2C413E4C 
423E4C44 
3E4C4420 
4C442044 
4420442C 
20442C4C 
442C2848 
4420442C 
20452C42 
452C433E 
2C443E4C 
453E4C44 
3E4C4420 
4C442045 
293E4C44 
3E4C4420 
4C442048 
4420482C 
20482C45 
482C483E 
2C4AC3E4C 
28484C29 
482C413E 
2C423E4C 
433E4C44 
3E4C4420 
4C44204C 
44204C2C 
204C2C28 
4C44204C 
44202848 
3E4C4420 
2C433E4C 
4C292C44 
28484C29 
44202848 
3E4C4420 
2C4C3E48 
4C442028 
413E4C44 
3E4C4420 
4C442041 
44204120 
20412C48 
412C4C3E 
2C28484C 
20412C41 
20412C42 
20412C43 
20412C44 
20412C45 


1B2 
1EA 
1E4 
1C1 
1E6 
1CF 
1F2 
1CE 
1D3 
1E2 
1EO 
1EF 
1E8 
167 
1FO 
1DF 
1C0 
1EC 
1D1 
1EB 
1E8 
1FA 
1BD 
1E1 
1F4 
1ED 
1CA 
1F7 
1DA 
1DA 
1F7 
1CB 
1D1 
1DE 
1B9 
1D3 
ICF 
1D7 
1E3 
1F7 
1F8 
1BD 
IDF 
1CB 
1E8 
1E5 
1D9 
1C5 
1D6 
1D7 
1D8 
1D9 


A3EO: 
A3E8: 
A3F0: 
A3F3: 
A400: 
A408: 
A410: 
A418: 
A420: 
A428: 
A430: 
A433: 
A440: 
A448: 
A450: 
A458: 
A460: 
A468: 
A47O: 
A478: 
A480: 
A488: 
A490: 
A493: 
A4A0: 
A4A8: 
A4BO: 
A4B8: 
A4CO: 
A4C3: 
A4DO: 
A4D8: 
A4EO: 
A4EB: 
A4AFO: 
A4FB: 
A500: 
A508: 
A510: 
A518: 
A520: 
A528: 
A530: 
A538: 
A540: 
A548: 
A550: 
A558: 
A560: 
A568: 
A570: 
A578: 


3E414444 
3E414444 
3E414444 
484C293E 
412C413E 
412C423E 
412C433E 
412C443E 
412C453E 
412C483E 
412C4C3E 
412C2848 
44432041 
55422042 
20433E53 
3E535542 
55422048 
204C3E53 
484C293E 
413E5342 
423E5342 
433E5342 
4A3E5342 
453E5342 
483E5342 
4C3E5342 
28484C29 
20412C41 
20423E41 
3E414E44 
4E442045 
20483E41 
3E414E44 
293E414E 
584F5220 
5220433E 
443E584F 
584F5220 
52204C3E 
28484029 
20413E4F 
4F522043 
443EAF52 
5220483E 
3E4F5220 
3E4F5220 
20423E43 
43502044 
453E4350 
50204C3E 
484C293E 
3E524554 


20412C48 
20412C4C 
20412C28 
41444420 
41444320 
41444320 
41444320 
41444320 
41444320 
41444320 
41444320 
4C293EA1 
2C413E53 
3E5355A2 
55422044 
20453E53 
3E5355A2 
55422028 
53554220 
432041 2C 
432041 2C 
432041 2C 
432041 2C 
432041 2C 
432041 2C 
432041 2C 
3E534243 
3E414E44 
4E4420 43 
20443E 41 
3E414E 44 
4E4420 4C 
202848 4C 
442041 3É 
423E58 4F 
584F52 20 
522045 3E 
483E58 4F 
584F52 20 
3E584F 52 
522042 3E 
3E4F5220 
20453E4F 
aF52204C 
2848429 
413E4350 
5020433E 
3E4350 20 
20483E£43 
43502028 
43502041 
204E5A3E 


1DC 

1E0 

1BG 

1E4 
1D4 

1D5 

1D6 

1D7 

iD8 

1DB 
1DF 
1D1 

1E6 

221 

LEF 
21E 
227 

1DC 
205 

1E4 
1E5 
1E6 
1E7 

1E8 
1EB 
1EF 
1FB 
1DF 
1D6 
1F4 
208 
1E5 
1ED 
1D9 
240 
20C 
21E 
246 
215 
21C 
1EO 
203 
215 
205 
1E4 
211 
1D4 
1E8 
IFF 
1D5 
LEF 
22F 


183 


A580: 
A583: 
A590: 
A598: 
A5A0: 
AS5A8: 
A5BO : 
A5B8: 
A5CO: 
A5C8: 
A5DO : 
A5D8: 
A5EO: 
A5E8: 
ASFO: 
A5F8: 
A600: 
A608: 
A610: 
A618: 
A620: 
A628: 
A630: 
A638: 
A640: 
A643: 
A650: 
A658: 
A660: 
A668: 
A670: 
A678: 
A680: 
A688: 
A690: 
A698: 
ABAO: 
A6A8: 
A6BO: 
A6B8: 
A6CO: 
A6C8: 
AS6DO: 
A6D8: 
ABEO: 
A6EB: 
A6F0: 
A6F8: 
A70O: 
AT708: 
A710: 
A718: 


184 


5O4F5020 42433E4A 
50204E5A 2CC23E4A 
5020C23E 43414C4G 
204E5A2C C23E5055 
53482042 433E4144 
4420412C C13E5253 
54203030 3E524554 
205A3E52 45543E4A 
50205A2C C23EC420 
203E4341 4C4C205A 
2CC23E43 414C4C20 
C23E4144 4320412C 
C13E5253 54203038 
3E524554 204E433E 
504F5020 44453E4A 
50204E43 2CC23E4F 
55542028 C1202029 
2C413E43 414C4C20 
4E432CC2 3E505553 
48204445 3E535542 
20C13E52 53542031 
303E5245 5420433E 
4558583E 44502043 
2CC23E49 4E20412C 
28C12020 293E4341 
4C4C2043 2CC23ECS 
20203E53 42432041 
2CC13E52 53542031 
383E5245 5420504F 
3E504F50 20484C3E 
4A502050 4F2CC23E 
45582028 5350292C 
484C3E43 414C4C20 
504F2CC2 3E505553 
4820484C 3E414E44 
20C13E52 53542032 
303E5245 54205045 
S3E4A5020 28484C29 
3E4A5020 50452CC2 
3E455820 44452C48 
4C3E4341 4C4C2050 
452CC23E C620203E 
584F5220 C13E5253 
54203238 3E524554 
20503E50 4F502041 
463E4A50 20502CC2 
3E44493E 43414C4AC 
20502CC2 3E505553 
48204146 3E4F5220 
C13E5253 54203330 
3E524554 204D3E4C 
44205350 2C484C3E 


A720: 
A728: 
AT730: 
A738: 
A740: 
A748: 
AT750: 
AT758: 
A760: 
A768: 
AT770: 
AT778: 
A780: 
A788: 
A790: 
A798: 
ATAO: 
ATA8: 
ATBO: 
A7B8: 
ATCO: 
A7C8: 
AT7DO: 
AT7D8: 
A7EO: 
ATE8: 
AT7FO: 
A7F8: 
AB00: 
A808: 
A810: 
A818: 
A820: 
A828: 
A830: 
A838: 
AB40: 
A848: 
A850: 
A858: 
A860: 
A868: 
A87O: 
A878: 
A880: 
A888: 
A890: 
A898: 
ABAO: 
A8A8: 
ABBO: 
A8B8: 


4A50204D 
493E4341 
2CC23ECT 
5020C13E 
33383E52 
52524320 
3E525220 
203E5352 
4C49203E 
3E424954 
42495420 
49542032 
5420332C 
20342C3E 
352C3E42 
2C3E4249 
3E524553 
52455320 
45532032 
5320332C 
20342C3E 
352C3E52 
2C3E5245 
3E534554 
53455420 
45542032 
5420332C 
20342C3E 
352C3E53 
2C3E5345 
3E423E43 
3E483E4C 
293E413E 
2C284329 
20284329 
42432048 
3E4C4420 
2020292C 
45473E52 
494D2030 
492C413E 
2C284329 
20284329 
44432048 
3E4C4420 
C2202020 
4554493E 
2C413E49 
2843293E 
2843292C 
4320484C 
4C442028 


2CC23E45 
4C4C204D 
20203E43 
52535420 
4C43203E 
3E524C20 
3E534C41 
41203E53 
53524C20 
20302C3E 
312C3E42 
2C3E4249 
3E424954 
42495420 
49542036 
5420372C 
20302C3E 
312C3E52 
2C3E5245 
3E524553 
52455320 
45532036 
5320372C 
20302C3E 
312C3E53 
2C3E5345 
3E534554 
53455420 
45542036 
5420372C 
3E443E45 
3E28484C 
494E2042 
JE4F5554 
2C423E53 
4C2C4243 
28C22020 
42433E4E 
45544E3E 
3E4C4420 
494E2043 
3E4F5554 
2C433E41 
4C2C4243 
42432C28 
20293E52 
4C442052 
4E20442C 
AF555420 
443E5342 
2C44453E 
C2202020 


A8CO: 
A8C8: 
A8DO: 
A8D8 : 
ABEO: 
ABE3: 
A8FO: 
A8F8: 
A900: 
A908: 
A910: 
A918: 
A920: 
A928: 
A930: 
A938: 
A940: 
A948: 
A950: 
A958: 
A960: 
A968: 
A970: 
A978: 
A980: 
A988: 
A990: 
A998: 
A9A0: 
A9A8: 
A9BO: 
A9B8: 
A9CO: 
A9C3: 
AS9D0: 
A9D8: 
A9EO: 
A9EB8: 
A9FO: 
A9F8: 
AAO0O: 
AAO08: 
AA10: 
AA18: 
AA20: 
AA28: 
AA30: 
AA38: 
AA40: 
AA43: 
AA5O: 
AA58: 


20292044 
20313E4C 
493E494E 
43293E4F 
43292C45 
20484C2C 
44204445 
20202029 
323E4C44 
3E494E20 
293E4F55 
292C483E 
484C2C48 
443E494E 
43293E4F 
43292C4C 
20484C2C 
4C443E49 
2843293E 
484C2C53 
2028C220 
2C53503E 
2C284329 
20284329 
44432048 
3E4C4420 
C2202020 
44493E43 
4AE4A93EA4F 
4C44443E 
494E443E 
3E4C4449 
49523E49 
4F544952 
523E4350 
4AE44523E 
3E404142 
4748494A 
51525356 
SBSESF60 
696A6F70 
TATBAOA1 
AAABBOB1 
BABBO0O41 
202C4243 
20C9202C 
4420C920 
442028C2 
292CCI3E 
C93E4144 
2CCIJE4C 
2C28C220 


453E494D 
4420412C 
20452C28 
55542028 
3E414443 
44453E4C 
2C28C220 
3E494D20 
20412C52 
482C2843 
54202843 
53424320 
4C3E5252 
204C2C28 
55542028 
3E414443 
484C3E52 
4E20462C 
53424320 
503E4C44 
20202029 
494E2041 
3E4AF5554 
2C413E41 
4C2C5350 
53502C28 
20293E4C 
50493E49 
5554493E 
4350443E 
AF555444 
523E4350 
4E49523E 
3E4C4444 
44523E49 
4F544452 
43444546 
4B4D4F 50 
5758595A 
61626768 
72737879 
A2A3A8A9 
B2B3B8B9 
444420C9 
3E414444 
44453E4C 
2CC23E4C 
20202020 
494E4320 
4420C920 
4420C920 
20202029 


: 3E444543 
: 4E432028 
: 2020293E 
: 28C9202B 


3E4C4420 


: C8202029 
: 444420C9 


3E4C4420 
202BC820 


: 4420432C 
: C8202029 
: 442C28C9 
: 20293E4C 


28C9202B 
3E4C4420 
202BC820 


: 44204C2C 
: C8202029 
: 28C9202B 
: 2C423E4C 
: 202BC820 
: 3E4C4420 
: C8202029 
: 442028C9 


20292C45 


: 28C9202B 


2C483E4C 


: 202BC820 


3E4C4420 


: C8202029 
: 4420412C 
: C8202029 


20412C28 


: 2020293E 


412C28C9 


: 20293E53 
: C9202BC8 
: 53424320 
: 202BC820 
: 4E442028 
: 2020293E 
: 28C9202B 


3E4F5220 


: C8202029 


28C9202B 
3E524C43 
2BC82020 


: 4320289 


20293E52 
202BC820 


: 522028C9 


20293E53 


20C93E49 
C9202BC8 
44454320 
C8202029 
28C9202B 
2CC13E41 
202C5350 
422C28C9 
20293E4C 
28C9202B 
3E4C4420 
202BC820 
4420452C 
C8202029 
482C28C9 
20293E4C 
28C9202B 
3E4C4420 
C8202029 
442028C9 
20292C43 
28C9202B 
2C443E4C 
202BC820 
3E4C4420 
C8202029 
442028C9 
20292C4C 
28C9202B 
2C413E4C 
28C9202B 
3E414444 
C9202BC8 
41444320 
202BC820 
55422028 
2020293E 
412C28C9 
20293E41 
C9202BC8 
584F5220 
C8202029 
28C9202B 
3E435020 
C8202029 
2028C920 
293E5252 
202BC820 
4C2028C9 
20293E52 
202BCB820 
4C412028 


27A 
2B5 
193 
26D 
22A 
29D 
260 
24D 
206 
20F 
21F 
294 
1A8 
26D 
253 
206 
218 
21F 
26D 
24D 
1EB 
22A 
22B 
288 
148 
26D 
253 
1F4 
22A 
228 
20D 
238 
291 
18F 
291 
1B9 
283 
256 
1FB 
2B6 
1C0 
26D 
23B 
222 
26D 
250 
23E 
287 
236 
20C 
296 
1AF 


185 


ACOO: 
ACO8: 
AC10: 
AC18: 
AC20: 
AC28: 
AC30: 
AC38: 
AC40: 
AC48: 
AC50: 
AC58: 
AC60: 
AC68: 
AC70: 
AC78: 
AC80: 
AC88: 
AC90: 
AC98: 
ACAO: 
ACA3: 
ACBO: 
ACB8: 
ACCO: 
ACC8: 
ACDO : 
ACD8: 
ACEO: 
ACE8: 
ACFO: 
ACF8: 
ADOO : 
ADO3: 
AD10: 
AD18: 
AD20: 
AD28: 
AD30: 
AD38: 
AD40: 
AD43: 
AD50: 
AD58: 
AD60: 
AD68: 
AD70: 
AD78: 
AD80: 
AD88: 
AD90: 
AD98: 


186 


C9202BC8 
53524120 
C8202029 
2028C920 
293E5352 
202BC820 
49542030 
2BC82020 
5420312C 
C8202029 
20322C28 
2020293E 
332C28C9 
20293E42 
2C28C920 
293E4249 
28C9202B 
3E424954 
C9202BC8 
42495420 
202BC820 
45532030 
2BC82020 
5320312C 
C8202029 
20322C28 
2020293E 
332C28C9 
20293E52 
2C28C9A0 
293E5245 
28C9202B 
3E524553 
C9202BC8 
52455320 
202BC820 
45542030 
2BC82020 
5420312C 
C8202029 
20322028 
2020293E 
332C28C9 
20293E53 
2C28C920 
293E5345 
28C9202B 
3E534554 
C9202BC8 
53455420 
202BC820 
4F5020C9 


2020293E 
28C9202B 
3E534C49 
2BC82020 
4C2028C9 
20293E42 
2C28C920 
293E4249 
28C9202B 
3E424954 
C9202BCB 
42495420 
202BC820 
49542034 
2BC82020 
5420352C 
C8202029 
20362C28 
2020293E 
372C28C9 
20293E52 
2C28C920 
293E5245 
28C9202B 
3E524553 
C9202BC8 
52455320 
202BC820 
45532034 
2BC82020 
5320352C 
C8202029 
20362C28 
2020293E 
372C28C9 
20293E53 
2C28C920 
293E5345 
28C9202B 
3E534554 
C9202BC8 
53455420 
202BC820 
45542034 
2BC82020 
5420352C 
C8202029 
20362C28 
2020293E 
372C28C9 
20293E50 
3E455820 


283 
242 
257 
264 
269 
1FC 
22A 
225 
20D 
24E 
282 
1A6 
283 
1BA 
270 
1C7 
26D 
1C7 
283 
253 
20C 
225 
231 
20C 
259 
282 
1B1 
283 
1C5 
2F0 
1D2 
26D 
1D2 
283 
25E 
20D 
226 
232 
20D 
25B 
282 
1B3 
283 
1C7 
270 
1D4 
26D 
1D4 
283 
260 
20A 
283 


28535029 
55534820 
2028C920 


: 2053502C 


21222329 
3639464E 
10717273 


: B68E96IE 
: CBCECBCB 
: CBCBCBCB 
: CBCBCBCB 
: CBCBCBCB 
: ELE3ESE9 
: 00000000 
: 00000000 
: 00000000 
: 00000000 
: O60E161E 
: 464E565E 
: B68E96IE 
: C6CEDGDE 
: 00000000 
£ 00000000 
: 00000000 
: 00000000 
: 00000000 
: 00000000 
: 00000000 
: 00000000 
: 00000000 
: 00000A0D 


42594D4F 
312E3129 
20535020 


: 20202049 
: 484C2020 
: 20204243 
: OAOD2E2A 


20202020 


: 20202020 


20202020 


: 20202020 


SE3F3F3F 


: 2E2E2E22 
: 0O0492E0D 
: 20202020 
: 20202020 
: 00202020 
: 20202020 
: 20200000 
: 4156494E 
: OAOD2053 


2CC93E50 
C93E4A50 
293E4C4A4 
C93E0919 
2A2B3435 
565E666E 
7475777E 
AGAEB6BE 
CBCBCBCB 
CBCBCBCB 
CBCBCBCB 
CBCBCBCB 
F9000000 
00000000 
00000000 
00000000 
00000000 
262E363E 
666E767E 
AGAEB6BE 
EGEEF6FE 
00005630 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
20484552 
4E202856 
OAOD2020 
20204959 
58202020 
20444520 
20202041 
20002020 
20202020 
20200020 
20202020 
20202000 
3E20222E 
OOOAOD2E 
2E002020 
20202020 
20202000 
20202020 
20202020 
OAOD2053 
47342000 
45415243 


211 
2B1 
228 
218 
14D 
28B 
3A4 
510 
658 
658 
658 
658 
48B 
000 
000 
000 
000 
110 
310 
510 
710 
086 
000 
000 
000 
000 
000 
000 
000 
000 
116 
223 
110 
1C5 
161 
19D 
166 
OCF 
100 
OEO 
100 
OEO 
1A9 
OF1 
OF2 
100 
OEO 
OEO 
100 
OCA 
ICF 
1A5 


AF40: 
AF48: 
AF50: 
AF58: 
AF60: 
AF63: 
AF7O: 
AF78: 
AF80: 
AF88: 
AF90: 
AF98: 
AFAO: 
AFA8: 
AFBO: 
AFB8: 
AFCO: 
AFC8: 
AFDO : 
AFD8: 
AFEO: 
AFE8: 
AFFO: 
AFF8: 
B000: 
B008: 
BO10: 
B018: 
B020: 
B028: 
B030: 
B038: 
BO040: 
B048: 
B050: 
B058: 
BO060: 
B068: 
B070: 
B078: 
B080: 
B088: 
BO090: 
B098: 
BOAO: 
BOA8: 
BOBO: 
BOB8: 
BOCO: 
BOC8: 
BODO: 
BOD8: 


48494E47 
OD20464F 
20000A0D 
44494E47 
OD202A2A 
522A2A00 
34353637 
43444546 
3A5OAEB7 
FS5CDA500 
F3CD4A00 
AF237EB7 
O3AF18F6 
F1CD5601 
FCCD9F00 
AFFE7 BDA 
FE61DAC7 
A200FEOD 
6CAF4FO6 
57CB3FCB 
SFCDCFAF 
E6OFCDCF 
CICDD8AF 
TCAF3A58 
3E20C37C 
18F6CD7C 
SEAEO680 
C220B03E 
3E31CD7C 
14B0C910 
00OA00O1 
3EO5F50A 
O33EFFB7 
523CD245 
C630CD7C 
3ABOC300 
BO7BCDOF 
TACDF1AF 
SAAE3A57 
7BCDF1AF 
CO003E00 
3FC37CAF 
18FAC118 
1128003A 
1OFD3ADD 
FDC921DD 
BOC390AF 
18F4E60OF 
FE3038CE 
FE3A38EE 
D63718E6 
D63718DE 


3A20000A 
554E443A 
204C4AF41 
3A20000A 
4552524F 
30313233 
38394142 
FS5CDA200 
CABEAFF1 
F1C9F1C9 
FBC9CD7C 
20F8C921 
21FDAE18 
3E0032A7 
FE7FCAC7 
COAF3E0O 
AFD620CD 
20DEC921 
00097ECI 
SFCB3FCB 
3257AE7A 
AF3258AE 
3A5 7 AECD 
AEC37CAF 
AFCDF1AF 
AF18F132 
3ASEAEAO 
30C322B0 
AFCB38C2 
27E80364 
00012BB0 
5FO30A57 
C5444DED 
B06069C1 
AFF13DC2 
BOT7ACDOF 
BOC300B0 
3A5BAE32 
AE3259AE 
C300BOCD 
3251AE3E 
C118F0C1 
FA21D8FF 
DCF34719 
F3472310 
F334CD95 
21DDF335 
CICDAABO 
FE4730CA 
FE4138C2 
FE3A38E2 
3E01B7C9 


BOEO : 
BOE8: 
BOFO: 
BOF8: 
B100: 
B108: 
B110: 
B118: 
B120: 
B128: 
B130: 
B138: 
B140: 
B148: 
B150: 
B158: 
B160: 
B168: 
B170: 
B178: 
B180: 
B188: 
B190: 
B198: 
B1AO: 
B1A8: 
B1B0: 
B1B8: 
B1CO0: 
B1C8: 
B1DO: 
B1D8: 
B1EO: 
B1E8: 
B1iFO: 
B1F8: 
B200: 
B208: 
B210: 
B218: 
B220: 
B223: 
B230: 
B238: 
B240: 
B248: 
B250: 
B258: 
B260: 
B268: 
B270: 
B278: 


3EOOB7C9 
FE4730F0 
FE4138E8 
AE473A6C 
C2EOBO3A 
69AEB838 
27CB27CB 
CDBDBOCD 
AECDBDBO 
BO3266AE 
20C28FBO 
CDOFB1 32 
B0473A68 
AECDBDBO 
67 AECDBD 
AEBO3267 
18B100C9 
4B67 AEED 
CD35B1ED 
436BAEC9 
4B6 7 AEED 
D1D1C9CD 
CDD8OOFE 
OOCDD500 
CICDBEB1 
C92A6IAE 
FSFE7E30 
AE7E3256 
2A69AE23 
S2AE3D32 
AEC9CD8B 
OABOEDSB 
BOCDA9B1 
B6B1CDA9 
CDB6B1CD 
AECDB6B1 
FAAECDB6 
C39AAF2A 
AECDD2B1 
F8C3A4AF 
AABOFE20 
BOCD70B1 
23137EFE 
C911CEAE 
AE18F6CD 
AE18EE3A 
SEB247CD 
BOCDOOBO 
BO21CEAE 
53AE3C32 
53AE473E 
CICD3ZEB2 


FE3038F4 
FE3A38F0 
18EA3A6A 
AEB838DC 
6BAE473A 
D318CDCB 
27CB27C9 
OFB13266 
473A66AE 
CDAABOFE 
C9CDBDBO 
68AECDBD 
AEBO 3268 
CDOFB132 
B0473A67 
AE18CDCD 
CD35B1ED 
4369AEC9 
4B6T7AEED 
CD35B1ED 
436DAEC9 
A4AF3E00 
FF28F73E 
FEOO20E8 
OOCIJE2ZE 
TEFE2038 
F1C92A69 
AECDO5B0 
2269AE3A 
S2AE3A56 
B13E3ACD 
6IAECD68 
32F7AECD 
B132F8AE 
A9B132F9 
CDA9B132 
B121F5AE 
6IAE226B 
CDF6B028 
CD64B1CD 
28E5CDB4 
18E37E12 
SEC22EB2 
18F021DF 
3EB221F1 
52AEB7CA 
00BOCDOO 
10F5CDOO 
C39AAF3A 
5IAEC93A 
003253AE 
CDB6B1CB 


418 
4C5 
405 
415 
426 
48A 
3C6 
45F 
47D 
51B 
524 
45F 
391 
4AT 
437 
457 
432 
470 
AED 
4C5 
ATA 
4C93 
4AFF 
3A8 
40A 
3DE 
AEE 
3E4 
2D7 
2FF 
4C5 
44E 
57B 
566 
586 
53B 
5A0 
3DA 
599 
5BD 
506 
429 
392 
45E 
48B 
4A6F 
3A1 
3FF 
493 
373 
2B9 
585 


187 


B280: 
B288: 
B290: 
B298: 
B2A0: 
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SFCB3FCB 
2143A7B8 
TEFE3EC2 
B23A53AE 
23CD39B2 
07CD72B2 
CAC5B223 
BDB2CD67 
B8C2B3B2 
ESCDB6B1 
233A57AE 
AE77C9ES5 
58AE325A 
3259AECD 
CDB2233A 
3ASAAE77 
B1E13E26 
17233A5B 
SCAE77C9 
2A69AE4AF 
B33EFFC3 
47097D32 
D8AFE13E 
23E53A5E 
E1C3D1B2 
B6B1CD72 
TE23FEOO 
CA66B3FE 
CD67B23E 
B32124A8 
CA85B323 
7TDB3CD67 
B8C273B3 
21CEAET7E 
B2B723C2 
CEAE237E 
AFFEC9C2 
AF77233A 
97B3CDB6 
325CAE3A 
AECDB6B1 
C243B23A 
B22106AE 
EOB3CD67 
C2D4B321 
B2B8CAFF 
SEC2F7B3 
S3AEB8C2 
39B2CD97 
TEFEC8CA 
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B6B1FECB 
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B13A58AE 
57AE325B 
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237EFE3E 
67B23A53 
B423CD39 
3E01325D 
TEFEC8C2 
B23E0032 
B723C268 
FEOOCA88 
TEFEC1CA 
CADBB2B7 
C93E5832 
B43E5932 
B421CEAE 
CBB2FEC2 
C3CA14B3 
B2FECSCA 
CA44B3FE 
B723C2AC 
B1CD73B2 
56AE473A 
FCB4237E 
B4CD67B2 
C2EAB423 
8BB13E3B 
SB69AECD 
B23E0432 
B4CDA9B4 
69AE2322 
B4CDF6B0 
AFCD64B1 
2028E4CD 
B118E3F1 
3A7S5AET77 
C92A6IAE 
232269AE 
T1AE7723 
ED4B69AE 
B7ED427D 
B57CFEOO 
88B57CFE 
TD2A69AE 
AEC90600 
19AF1ABE 
3ECAABB5 
C2A4B513 
2313FE3E 
00325FAE 


ADT7E23FE 
B8CA3BB4 
B2CD67B2 
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S3AEBS8CA 
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68BOCD3E 
S2AECDD6 
C34BB22A 
GBAECDFF 
28F8C3A4 
CDAABOFE 
B4BOCD70 
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232269AE 
3A72AE77 
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77232269 
FEOOCAS1 
FEOOCA45 
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A801E1A9 
BECAFFB5 
B5131AFE 
13030AB7 
13FE3EC2 
325FAE2A 
77232269 
OA772322 
AEFEOOCA 
1BAAO1BE 
1ABECA48 
41B6131A 
B613030A 
2313FE3E 
00325FAE 
63AE7723 
69AEOAT77 
2269AE3A 
C27EB63A 
AE772322 
AEFEOOCA 
AEFEOOCA 
AEFECBC2 
00097E2A 
2269AEC9 
002119AF 
B7FE3EC2 
7DAE1111 
TDAE1ABE 
1AFE3EC2 
79FEO820 
13FE3EC2 
00325FAE 
CB772322 
AECB20CB 
B0772322 
12B7131A 
B7130478 
B6C92313 
B6C9CB27 
CB2747C9 
772B3E20 
C92106AF 
9SAFFE24 
001171AE 
BO20E97E 
13043E04 
CD24B7 3E 


AESA6OAE 
B53A61AE 
B53A62AE 
B5C91124 
2119AF1A 
FE3ECAF8 
3EC2F1B5 
20E6C923 
E7B53E00 
GIAEZEED 
AE2A69AE 
6IAE3A60 
S1B5C911 
AD2119AF 
B6FE3ECA 
FE3EC23A 
B720E6C9 
C230B63E 
2A69AE3A 
2269AE2A 
3263AE23 
65AEFEOO 
81AE2A69 
69AE3A60 
S1B53A61 
45B53A63 
95AF2148 
69AE7723 
1143A706 
1ABECA12 
02B7D522 
A80EO0O02A 
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C7B6130C 
EAD1C923 
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FE3EC202 
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3E20772B 
7172B772B 
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C280B706 
237ECDE4 
CDD4B012 
B8C244B7 
C2773E00 


31B 
417 
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3E3 
336 
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486 
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314 
277 
456 
31A 
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35C 
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2BA 
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384 
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31B 
A17 
40D 
AE6 
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303 
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465 
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446 
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B73A72AE 
3A73AECD 
AEBO3272 
23C334B7 
FEOOCA95 
D3B70600 
TECDE4BO 
D4B01213 
C297B7CD 
773E0032 
AECD1AB7 
327AAE3A 
B73A7CAE 
C384B723 
OSAFT7EFE 
FE24C219 
7S5AE237E 
E97ECDD4 
3E02B8C2 
B73EC177 
AE3A75AE 
76AEBO32 
B723C3DA 
TEFEOOCA 
C25FB806 
237ECDE4 
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C8773E00 
81AECD1A 
BO3281AE 
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B8237EFE 
3EDD3263 
FES9C28D 
63AEC38F 
20772B3E 
3264AE18 
2106AF11 
23137EB7 
3E121B1A 
B8C92A6F 
JEL1ECD7C 
CD9FAF3E 
EDSB69AE 
003251AE 
2269AE3E 
CD26B5CD 
3251AEC9 
6IAEZE1E 


T1AECD1A 
BO03271AE 
1AB73A74 
AEC331B7 
2106AF7E 
AFFE40C2 
1179AE23 
20E97ECD 
043E04B8 
24B73EC3 
62AE3A79 
3A7 AAEBO 
TBAECD1A 
BO3279AE 
C387B721 
OOCA95AF 
B8060011 
CDE4B020 
B0121304 
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TSAEC3D7 
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B73A82AE 
C31DB823 
OBAFTEFE 
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AEC38FB8 
B83EFD32 
B818D73E 
C9773E00 
C62318C6 
19AF7E12 
C2A8B83E 
FE20CAAF 
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2A6FAE22 
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OBB2CD9IF 
OABOEDSB 
BO3E0032 
64B11106 
BOD11213 
3E013260 
3262AE32 
AE325FAE 
D7B7CD84 
2A69AE22 
B53A5FAE 
BSCDDEBS5 
OOCABAB8 
SFAEFEOO 
1DB8CD63 
CD27B63A 
CABAB83E 
C37FBOCD 
AE226FAE 
AECDSFB1 
66AE7723 
AABOFE20 
S6AE3C32 
CADDB8CD 
CD64B12A 
AE3E0032 
B12A69AE 
232269AE 
20CAF4B8 
3256AEFE 
CDB4B018 
CDS9AAFED 
68BOED5B 
BOEDSB89 
EDSB8BAE 
SB8DAECD 
8FAECD68 
CDF1AFC3 
OOFD2287 
AE228BAE 
ED438FAE 
FSB9CD64 
222FBA3A 
SFAEED5B 
AEDD2A89 
AE18C3C3 
B12A69AE 
91AEED4B 
8DAE2A8B 
AEFD2A87 
AE18D8CD 
AE2285AE 


AF3E3ACD 
6IAECD68 
S1AECSCD 
AFDSCDAA 
1AB720F5 
AE3261AE 
64AE3265 
CD31B7CD 
B7CDAOB8 
6FAECD92 
FEOOCABA 
S3A5FAEFE 
CDA4B6 3A 
CABABS8CD 
B8CDAOB8 
SFAEFEOO 
O932DDF3 
64B12A69 
3E003256 
2A69AE3A 
2269AECD 
CADDB83A 
S6AEFEO4 
B4B018D9 
69AE226F 
SEAECDSF 
3A66AET7 
CDAABOFE 
3A5EAE3C 
O4CAF4B8 
D92192AE 
SB85AECD 
87AECD68 
AECD68B0 
CD68BOED 
68BOEDSB 
BO3A91AE 
A4AFCDOO 
AEDD2289 
ED538DAE 
3291AEC3 
B12A69AE 
91AEED4B 
SDAE2A8B 
AEFD2A87 
0000CD64 
228CBA3A 
BFAEEDSB 
AEDD2A89 
AEED7B85 
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91AE3ELE 
TCAFCD7C 
CD64B1CD 
B12A69AE 
232269AE 
FOC3A4AF 
70B1CD7C 
7E232269 
1723226D 
2BEBC3A4 
CD70B121 
AE3E0032 
BOFE22C2 
BO2A6DAE 
47BB3EOO 
DDF3FE1E 
0023226D 
34FEOOC2 
9OBBCDB4 
2A6DAE3A 
226DAE21 
AABOFE20 
00B7C38D 
S3AS5GAEFE 
3E063254 
226DAE2A 
AE3AS56AE 
TE2A6DAE 
2A69AE23 
F6B028D9 
67AE2322 
AE23226D 
3A54AE3C 
07C2EEBB 
AF3EODCD 
B13E0032 
6IAECD68 
232269AE 
95BBC3A4 
3EOACDT7C 
TCAF3E25 
5B69AECD 
CD7CAFED 
68B03E23 
69AECD35 
3E083252 


AECD64B1 
BIAECD64 
228BAECD 
AE228DAE 
6I9AE228F 
3A66AE32 
CD7CAFCD 
AFC3F5B9 
TOBICDSF 
SA66AET7 
CDF6B028 
CD64B1CD 
B12A69AE 
AE2A6DAE 
AECDF6BO 
AFCD64B1 
OBAF226D 
S56AECDAA 
62BBCDAA 
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BOCDSFB1 
65AE7723 
S6AE34CD 
C285BB3E 
BBCDB4BO 
08C265BB 
AE2106AF 
6I9AE2267 
4T2A6TAE 
BECABFBB 
2269AECD 
C3AA4AF2A 
67AE2A6D 
AEO520D5 
3254AEFE 
3EOACD7G 
7CAFCDA1 
54AEEDSB 
BO2A69AE 
CDF6BOCA 
AFCD64B1 
AF3EODCD 
CD7CAFED 
5DBO3E24 
5B69AECD 
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BOC3A4AF 
AECDAABO 
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CDAABOFE 
FE3AD292 
53AEC10A 
03E13A53 
BC193DC2 
AE3C3252 
CD7C326A 
AEC9CD7B 
FE20C27F 
CD64B1CD 
AEED4B6B 
BCC308BC 
70B12A69 
AEB7ED42 
B1CD70B1 
6BAEA6GSF 
6CAEA6 57 
64B1CD70 
216BAEB6 
216CAEB6 
CD64B1CD 
AE216BAE 
AE216CAE 
DEBCCDAA 
8CB02119 
C5CDAABO 
CA66BD77 
B820ECC3 
1723043E 
3E0077CD 
C28CBOC9 
CDFO0021 
AFC3A4AF 
OOCDEAOO 
C1C9C5D5 
38DA18F2 
E40038D0 
ESCDE100 
3E003250 
AECD42BD 
AFCD64B1 
2CAFCD9A 
060A3E80 


BCO600C3 
CA52BCC3 
3A66AECB 
AE2152AE 
CD38BC32 
BC3269AE 
20C27FBO 
003252AE 
2BBOESCS5 
30DA92B0 
BOE6OF32 
SFO30A57 
AEBT7CAAE 
A9BC3A52 
AEFEO520 
AE7D3269 
BCCDAABO 
BOC308BC 
TOB12A69 
AEO9CDB9 
CD64B1CD 
AEED4B6B 
18E8CD64 
S3A69AE21 
3A6GAAE21 
EB18CFCD 
B13A69AE 
SF3A6AAE 
57EB18B6 
70B13A69 
AESF3A6A 
AEST7EBC3 
BOFE22C2 
AFO600ES 
CIEIFE22 
23043E11 
8CBO3E20 
12B820F6 
AABOFE20 
ED7B7DAE 
SFAFCD9A 
CSD5ES53E 
38E6E1D1 
ESCDEDOO 
CSDSESCD 
18E8C5D5 
38C618DE 
AEED737D 
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6IAECD68 
BOC3A4AF 
AEED737D 
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CDB4BOCD 
3256AE21 
AF2119AF 
AEBDO60A 
80C26ABE 
AFO606CD 
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4T7TAFCD9A 
CD9AAF11 
AFO6061A 
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9AAFCDAE 
AA4ABD6FCD 
10F5D13A 
C6BEEDSB 
6IAEE1CD 
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OODSEDSB 
BOD1CD68 
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42BD2A69 
1AB7CAOA 
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93BADOBC 
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EOBA1DBB 
FCBA43B5 
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28BDF4BE 
2A2B2D3A 
46484A4D 
50512640 
9FAFC37F 
S1AECD95 
FE2EC25F 
572110BF 


06067ECD 
F9CDFOOO 
EDSB6BAE 
E5226BAE 
02E17DCD 
9ABD1OFS 
2A6BAE1A 
2B7CB5C2 
OODSEDSB 
BOD1CD68 
3E003250 
AECD42BD 
AE321FAF 
20CASBBE 
64B13E01 
38AFCD9A 
CD9AAFCD 
CDA4BDFE 
10F62106 
A4BD7723 
CDE70021 
AF2106AF 
19AF2106 
BEC25BBE 
2152AFCD 
BDO602CD 
AA4ABD67E5 
56AEB7CA 
6IAEEDS3 
A4ABD1213 
CBBECDE7 
69AECD68 
BOC3A4AF 
AEC3A4AF 
CD64B1CD 
AE1119AF 
BF771323 
AEC311B2 
O5BC64BC 
E4BCCOB9 
AABA31B5 
6EBA1CB2 
B8BD34BE 
F6BCOFBD 
21232425 
3B414344 
5458534C 
2F5700CD 
BO3E0132 
BOCDS90AF 
BFCDAABO 
0144BFOA 


BF80: BAC298BF 7E326CBA 4A9 BFCO: AEF3CD6G OOCDCCOO 473 
BF88: 237E326D BACDAABO 421 BFC8: CDC3003E 003250AE 2FE 
BF90: FE20C27F BOC36BBA 4F7 BFDO: CDFSB93E 013251AE 3EB 
BF98: 032323FE OOC27FBF 347 BFD8: S3AS1AEFE O1C2E3BF 49C 
BFAO: C37FBOED 7385AEFD 582 BFEO: CD9FAFCD A9AFCD65 572 
BFA8: 2287AEDD 2289AE22 3AF BFE8: BF18EDFF FFFFFFFF 6BF 
BFBO: S8BAEEDS3 SDAEED43 4E4 BEFO: FEFFFFFFF FEFFFFFF 7F8 
BFB8: 8FAE3291 AE3E2732 345 BFF8: FFFFFFOO FFFFFFFF 6F9 


23.2 Werken met de HERBYMON 


10 CLEAR200,&H9FFF : SCREENO : CLS 

20 BLOAD"HERBY . MON” 

30 DEFUSR=49059! : KEY1, “"M=USR(O)"+CHR$(13) 
40 PRINT"F1 - HERBYMON": NEW 


Laten we aannemen dat het u is gelukt om de HERBYMON op te starten. 
Waarschijnlijk doet u dit met behulp van een simpele BASIC-loader (listing 23.1) 
of misschien zelfs meteen met behulp van het ‘BLOAD"HERBY.MON”, 
R’-commando. In beide gevallen krijgt u in 40-koloms mode het volgende 
openingsscherm: 


HERBYMON (V1.1) 
SP IY IX HL DE BC A 
PDL DE92 F38B BF96 0007 0300 00 


De hexadecimale waarden kunnen afwijken; daarover straks meer. De uitdruk- 
king ‘HERBYMON (V1.1)’ snapt u wel, maar waar slaan die letters op? Welnu: 
die verwijzen naar de inmiddels welbekende interne Z80-registers. 


SP: stack pointer (of stapelwijzer) 
IY: index-Y register 
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index-X register 
Hl-registerpaar 

DE-registerpaar 
BC-registerpaar 
accumulator 


De getallen die zich onder dit illustere zevental bevinden, zullen eventueel veran- 
deren onder invloed van uw eigen routines en/of een speciaal HERBYMON- 
commando. Bedenk dat u deze waarden kunt gebruiken tijdens de beoordeling 
van routines in de testfase. 


U heeft 26 commando's tot uw beschikking. Even in het kort: 


olie er © A 


assembleren 

subroutine-aanroep, met terugkeer in de HERBYMON 

disassembleren 

een geheugengebied met een bepaalde waarde vullen 

een geheugengebied doorzoeken op de aanwezigheid van een gewenste 
reeks tekens 

een sprong vanuit de HERBYMON naar uw eigen programma 

een HERBYMON-file van cassette laden 

een memory-dump in bytes en ASCII 


… de printer activeren 


de printer deactiveren 
een stuk geheugen als HERBYMON-file naar cassette saven 


een stuk geheugen verplaatsen 


een stuk ASCII-tekst op een gewenste geheugenplaats schrijven 
verlaten van de HERBYMON 

te voorschijn halen van de ‘interne’ registers 
conversie van een decimale waarde 
conversie van een hexadecimale waarde 
conversie van een binaire waarde 

logische AND op twee waarden 

invullen van de interne registers 

de som van twee waarden berekenen 

het verschil van twee waarden berekenen 
logische XOR op twee waarden 

bytes plaatsen met memory-dump 
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: bytes plaatsen met disassemblering 
@ — logische OR op twee waarden 


Van de meeste commando's zult u de syntax en het effect waarschijnlijk al 
vermoeden. Toch krijgt u nog even een nadere uitleg. 


A — ASSEMBLEREN 
Het per regel assembleren van machinecode. U doet het als volgt: 
„A [startadres] [mnemonic] (operand(s)] 


Tussen elke parameter staat één spatie en na het indrukken van de RETURN- 
toets zal de HERBYMON op twee manieren kunnen reageren: 


1 De syntax wordt geaccepteerd, omgezet en gedisassembleerd. Het gevolg is dat 
u vanaf de volgende (logische) geheugenplaats verder kunt gaan. 

2 U maakte een foutje! En zie, een vraagteken. (In dit geval heeft u een niet- 
bestaande instructie bedacht of zit de vergissing in de operand.) 


Om goed te kunnen assembleren even de volgende wenken. 
Een relatieve sprong geeft u aan met ‘“@….’, een index-offset met ‘&.…’ en de 
gewone bytes en words met respectievelijk ‘$… en ‘$….’! 


Bijvoorbeeld: 


„A EOOO DJNZ @EOOO 

„A EOOO LD (IX+8&7F) „SFF 
„A E0O0O LD HL,$1234 

„A E000 RET 


TIP: tussen SCOO00 en $F380 ligt een prima gebied dat u vanuit BASIC beschermt 
met de opdracht CLEAR200,&hBFFF!) 


C — SUBROUTINE 


U springt naar een zelfgeschreven machinecode-subroutine en keert als alles goed 
gaat weer netjes in de HERBYMON terug. Dat gaat als volgt: 
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‚C [startadres] 


Bijvoorbeeld: 
„C 00CO 


TIP: maak gebruik van dit commando om gewenste of ongewenste effecten te 
doorgronden. Het is mogelijk om eerst de interne registers te veranderen, dit voor 
optimaal gemak. 


D — DISASSEMBLEREN 


U laat een aantal bytes decoderen naar leesbare Z80-instructies. Dit commando is 
dus het tegenovergestelde van het assembleercommando. Doe het zo: 


‚D [startadres] of 
‚D [startadres]) [eindadres] 


Bijvoorbeeld: 


„D 1000 
„D 1000 2000 


(TIP: U pauzeert het disassembleren door op de spatiebalk te drukken. U onder- 
breekt voortijdig met behulp van één van de cursortoetsen.) 


F — FILL of ‘VOL-POKEN’ 
U vult een stuk geheugen met een gewenste byte-waarde: 
„F [startadres] [eindadres] [byte] 


Bijvoorbeeld: 


„F DOOO EOOO 00 


Kijk nu maar met het M-commando naar de inhoud van hetzelfde gebied. 
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TIP: om te weten of uw routines niets verknoeien, kunt u een stuk geheugen vullen 
en dan na afloop kijken of er iets fout is gegaan. 


H — HUNT of ZOEKEN 


U onderzoekt een stuk geheugen op de aanwezigheid van een bepaald teken of een 
bepaalde reeks tekens. Dat kan op twee manieren: 


„H {startadres) [eindadres] [byte] … [byte] 
„H [startadres] (eindadres) [string] 


Bijvoorbeeld: 


„H 1000 2000 FF FF 


„H 1000 8000 
BASIC 


TIP: zie de D-tip. Gebruik dit commando om dom zoeken te voorkomen. Handig 
als u niet meer weet waar uw teksten zijn gebleven! 


J — JUMP of ‘SPRINGEN’ 


U springt vanuit de HERBYMON naar uw zelfgeschreven machinetaalpro- 
gramma. Vooraf kunt u nog even de interne registers wijzigen; deze worden 
gekopieerd voordat de sprong in het diepe wordt gemaakt. De syntax: 

J [startadres] 

Bijvoorbeeld: 

„J 0000 


(TIP: spring vanuit de HERBYMON om zeker te weten dat u ‘goed aankomt’… 
Bekijk vooraf altijd even de interne registers!) 


L — LOADEN 
Een file in HERB YMON-formaat(!) van cassette laden. Twee mogelijkheden: 
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„L [file-naam] of 
„L [file-naam] [loadadres] 


Bijvoorbeeld: 


„.L TEST 
„L TEST D880 


TIP: HERBYMON-formaat is veiligheidshalve afwijkend van het standaard- 
MSX-formaat. Een file die is opgeslagen vanuit de HERBYMON kunt u ook 
weer binnenhalen. Een ‘vreemde! file leest u in met een BASIC-loader, dus met het 
BLOAD-commando. 

M — MEMORY-DUMP of GEHEUGENDUMP 


U kunt een stuk geheugen bekijken in zowel bytes als ASCII. Op twee verschil- 
lende manieren: 


„M [startadres) 
.„M [startadres] [eindadres] 


Bijvoorbeeld: 


„Mm 2000 
.M 2000 3000 


TIP: zie de D-tip. Gebruik dit commando om bijvoorbeeld teksten te kunnen 
lezen of om gewoon een stuk geheugen te onderzoeken. 
P — PRINTER ACTIVEREN 


Na het geven van dit commando krijgt u alles zowel op het scherm als op de 
printer, mits er een MSX-compatible printer wordt gebruikt 


4 
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TIP: als de printer niet staat aangesloten, komt u ‘los’ met behulp van CON- 
TROL-STOP. 


Q — PRINTER DEACTIVEREN 


Printen kost papier. Als u klaar bent met het printen van het gewenste materiaal, 
schakelt u de simultane printerwerking met dit commando weer uit: 


„Q 


S — SAVEN 
U bewaart een file in het afwijkende HERBYMON-formaat op cassette: 
‚S [file-naam] [startadres] (eindadres] 


Bijvoorbeeld: 
„S TEST 1000 2000 
TIP: als u zich heeft vergist, drukt u op CONTROL-STOP. Als u een file in het 


standaard MSX-formaat wilt opslaan, gaat u met behulp van het X-commando 
terug naar BASIC en gebruikt u de ‘“BSAVE'-instructie. 


T — TRANSFER of VERPLAATSEN 
U kunt een stuk geheugen verplaatsen naar een nieuw adres: 


.T [beginadres] [eindadres] (verplaatsadres] 
Bijvoorbeeld: 


„T A000 CO00 DOOO 


TIP: gebruik dit commando in combinatie met de ‘LAAD OP ADRES’-mogelijk- 
heid, om uw subroutinebibliotheek te linken. 
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W — WRITE of SCHRIJF 

Een commando om teksten met de HERBYMON te kunnen plaatsen. Dit 
bespaart u erg veel tijd, omdat u anders met een ASCII-tabel en het :-commando 
moet knoeien. Het gaat zo: 

„W [startadres] [string] 

Bijvoorbeeld: 


.W D800 maximaal 16 


TIP: kies altijd vaste gebieden voor uw teksten, aangezien de combinatie met 
machinecode anders een grote puinhoop kan worden! 
X — EXIT of VERLATEN VAN DE HERBYMON 


U gaat weer netjes terug naar BASIC. Om te laden, op te slaan, of om een 
combinatie BASIC-machinecode te testen. Gewoon: 


„X 


!-— INTERNE REGISTERS 


Als de HERBYMON opstart, worden alle registers intern weggeschreven. Dit 
gebeurt ook na de terugkeer uit een subroutine. Het '-commando gebruikt u om te 
kijken hoe het ‘met ze gaat’: 


TIP: handig VOORDAT u het *-commando gebruikt. 


# — DECIMAAL 


U krijgt het binaire en het hexadecimale broertje van een decimale waarde (van 
maximaal $ cijfers) te zien: 


„# [decimaal word] 


Bijvoorbeeld: 


„…# 01234 


$ — HEXADECIMAAL 


Display van het binaire en decimale equivalent van een hexadecimale waarde 
(lengte maximaal 4 tekens): 


‚$ [hexadecimaal word] 


Bijvoorbeeld: 


„$ 1234 


% — BINAIR 


Conversie naar decimaal en hexadecimaal van een binaire waarde (lengte maxi- 
maal 16 tekens): 


„% [binaire waarde] 


Bijvoorbeeld: 


.% 1010101010101010 


& — AND 
De logische AND van twee words: 
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‚& [word] [word] 
Bijvoorbeeld: 


„& 1111 FFFF 


TIP: met één byte wordt dit bijvoorbeeld: .& 001 1 OOFF 


* — AANPASSEN VAN DE INTERNE REGISTERS 

U verandert de interne registers (eerst het '-commando geven): 
* [SP] (IY] [EX] (HL] [DE] [BC] [A] 

Bijvoorbeeld: 


„* 0000 1111 2222 3333 b4b4 5555 66 


TIP: een prima mogelijkheid om een subroutine te controleren of om een sprong 
goed te laten starten. 

+ —- SOM 

U krijgt de som van twee hexadecimale waarden: 

„+ [word] [word] 


Bijvoorbeeld: 


„+ 1010 2020 


—— VERSCHIL 
U krijgt het verschil van twee hexadecimale waarden: 


— [word] [word] 
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Bijvoorbeeld: 

.— 2020 1010 

@-—OR 

De logische OR van twee words: 


„@ [word] [word] 

Bijvoorbeeld: 

„@ FFFF OFOF 

| -XOR 

De logische XOR van twee words: 


‚/ [word] [word] 


Bijvoorbeeld: 


st EFEF DEOF 


TIP: de XOR-instructie is een krachtig maar zeer ondoorzichtig wapen. Wat 
experimenteren is dan ook vereist. 
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Appendix A 
De Z80-instructieset 


De instructies staan in alfabetische volgorde en hebben de in HERBYMON 


gebruikte syntax 


[cs IMNEKONIC 


ADC A, (HL) 

ADC A, (1X+%00) 
ADC A, (IY+&oo) 
ADC A,A 

ADC A,B 

ADC A,£ 

ADC A,D 

ADC AE 

ADC A‚H 

ADC A‚L 

ADE A, $bb 

ADC HL,BE 

ADC KL,‚DE 

ADC HL,KL 

ADC HL, SP 


ADD A, (HL? 
RDD A, (IX+koo) 
ADD A, (1Y+&o0) 
ADD A,Â 
ADD A,B 
ADO A,C 
ADD A‚D 
ADD A,E 
ADD A,H 
ADD AL 


HEX 


BE 
DD 3E oa 
FD BE oo 


85 
DD 36 oo 
FD 36 aa 
87 
Bû 
Bl 
82 
83 
Bá 
g5 


RRRORR 
RRRORR 
RRRORR 


DD vv VW Vv DD Wo WV TD DW WW 
Do DD OD DD ww 0D Do DD zo 
ZE ZU ZU ZE ZO ZU ZU 2 ZV z 
ses ene 
Do WV MW WW WV W MW WW MO WW 
zo DD DD WV 0 DD VW wv DD WW 


EE El 


an en de OO de OO ee ae 


En en Bn Bn en en in in in en en A LN PI 


oe en ee en ee CI CH Md 


Cycli 


[210,28 [gaìsec 


en en ee nd de Ee En en Ee OE oe en ee 
en Cn un on 0 a 


„0 0 


Bn Be Ben Dn Een Be Bn nn on vd 
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ADD A,$bb 
ADD HL, BC 
ADD HL, DE 
ADD KL, HL 
ADD HL, SP 
ADD IX,BC 
ADD IX,DE 
ADD IE, IX 
ADD 14, SP 
ADD IY,BC 
ADD IY,DE 
ADD 14, IY 
ADD IY,SP 


ÂKD {kL) 

AND (IX+d00) 
AND (IY+&oo) 
AND À 

AND B 

AND C 

AND D 

AND E 

AKD H 

AND L 

ÂND $bb 


BIT 0, (HL) 
BIT 0, (1X+k00) 
BIT 0, (IY+koo) 
BIT 0,A 
BIT 0,B 
BIT 6,C 
BIT 0,D 
BIT 0,£ 
BIT 0, 
BIT 0,L 


BIT 1, (KL) 

BIT 1, (IX+koo) 
BiT 1,{IY+kaa) 
BiT 1,Â 
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CB 45 
DD CB oo 4é 
FD CB oo 44 
CB 47 
CB 4Ù 
CB 4i 
CB 42 
C3 45 
CB 44 
CB 45 


CB 4E 
DD CB oo 4E 
FD CB oa 4E 
CB Af 


RRRORR 
sik Ok 
oe a: 
RN 
RON 
KOER 
= RIGE 


vv wv DV Dv VW WV WV WW MD zw 
Zo 4 DW U DW VW WV WV D ZW 
ee ni ei ei in en en 


BA Mk Bn 
vw DD WP W VW U W zo zw zo 


1 
oo wo DD 
egen en ee 


en 


ese Ee 
oo ov Dv WV AW DW Do Wv WW 


cocecoscocesoese 


ee 


dd ded 


a Pk fe ne fs OM Od ae et ne ee a 


a ne Oe oe ok 


an oe a 


ee En Ee Be Be Oe Bn Bn Bm CA Cd Cl Al PI 


RI HI RI RO MI RI MI en EN Cd 


mr Cn UT Cd 


0 0 


BIT 2, (KL) 

BIT 2, (1{+koo) 
BIT 2, (1Y+koo) 
BIT 2,4 

BIT 2,8 

BIT 2,C 

BIT 2,D 

BIT 2,£ 

BIT 2,H 

BIT 2,L 


BIT 3, (HL) 

BIT 3, (1X+%oo) 
BIT 3, (IY+4ao) 
BIT 3,Â 

BIT 3,B 

BIT 3,C 

BIT 3,D 

BIT 3,E 

BIT 3,H 

BIT 3,L 


BIT 4, (KL 

BIT 4, (1X+ko0) 
BIT 4, (1Y+kao) 
BIT 4,A 

BIT 4,8 

BIT AC 

BIT 4,D 

BIT 4,E 

BIT 4, 

BIT AL 


BIT 5, (KL) 


CB 48 
CB 4% 
CB 4â 
CB 4E 
CB 4C 
CB 4D 


Câ 56 
DD CB 
FD CB 
£B 57 
CB 50 
CE 51 
CB 52 
CB 55 
CB 54 
CB 55 


Ch SE 
DD CB 
FD CB 
CB SF 
CB 58 
CB 59 
CB SÀ 
CB 5B 
CB SC 
CB 5D 


CB 56 
DD CB 
FD CB 
CB 67 
CB &Û 
CB ál 
CB 62 
EB 63 
CB 6á 
CB 65 


CB bE 


1 
zo 
me en ge en en ee en 
hs eed 
1 


1 
zo 
en ee gn en gn een pe en pn 
he =d 
1 


1 


1 
zo 
on ge en en ee ie ie gn en je 
eG esesessSses ss e 
1 


1 
zu 
_ 
kend 

1 


ne de a 


ne On ae a nd ae ne re ne Oe On 


ne ne Oe ne a 


nn a ae ned 


Ph PII RI RI RI CN EN Cd Pa PJ PJ PI PI PI RI CA EN Cd 


KI na PI PI PI RI RI CN LA Cl 


cd 
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BIT 5, (IÌ+koo) 
BIT 5, (if+koo) 
BIT 5,4 
BIT 5,B 
BIT 5,C 
BIT 5,D 
BIT 5,E 
BIT 5,H 
BIT 5,L 


BIT 6, (HL) 

BIT 5, (IX+koo) 
BIT 5, (1Y#&o0) 
BIT 6,A 

BIT 6,8 

BIT 6,C 

BIT 6,D 

BIT 6,E 

BIT b,H 

BIT ó,L 


BIT 7, (KL) 
BIT 7, (1X+&oo) 
BIT 7, (I4+koo) 


CALL $hhil 
CALL C,$hhl1 
CALL H,$hhtl 
CALL NC,Shh11 
CALL NZ, Shall 
CALL P,$hh1t 
CALL PE, Shall 
CALL PO, Shi 
CALL Z, hal 
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DD CB 
FD CB 
CB óf 
CB 68 
CB 65 
CB bÂ 
CB 68 
CB &C 
CB 6D 


CB 76 
DD CB 
FD CB 
CB 77 
CB 70 
CB 7i 
CB 72 
CB 75 
CB 74 
CB 75 


CB 7E 
DD CE 
FD CB 
CB JF 
CB 78 
CB 79 
CB 7A 
CB 78 
CB 7C 
CB 7D 


CD 1 
DE 1} 
FC 1 
Dá 11 
C4 11 
Fâ 11 
EC 11 
E4 11 
EC 1} 


oo 4E 
oo dE 


1 
oo Vv WV WV DP DVP DOD 


dd dd 
EI edeedkeed 
1 
1 


t 
0 WW WV DW VD DV DW W DW wW 
ee en a ae en 
Soes 

: 1 

t 1 


nn ne One OK ai ne oe ne ne ne ne ene et ne Oe Oe 


De EE 


PJ m3 PI PI PI RI RI CA EN Ci PI PI RI RI PI IP CO EN Ot PI PI PI MI PI RI RI EN 


«nen en en en Cn Cn En CH 


(10) 
(tú 
ûì 
(ût 
SED 
(10 
(1) 
(10) 


CF 


CP {HL} 

EP (Iä+&oo} 
CP [IY+&so) 
CP 4 

CP B 

CP C 

CP D 

CP E 

CP H 

dE 

CP $bb 


PD 


CPDR 


CPI 


CPIR 


CPL 


DAA 


DEC (Hi) 

DEC (IX+%o0) 
DEC (1Y+&oo) 
DEC A 

DEC B 

DEC BC 

DEC C 

DEC D 

DEC DE 

DEC E 

DEC H 

DEC HL 

DEC IX 

DEC IY 

DEC L 


JF 


BE 
DD BE oo 
FD BE oo 
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35 
DD 35 oo 
FD 35 oo 


ann 


Wo VD VW VD Ù VW W VW Www Do DW 
ee Ke Ee ee 
vo VDW VW DP DW Vo Oo 
ne in ie ee a ae 
VD DO DV VW DV VD ov DW 
ee ee ede 


ne de ne re nt en ne ai 


A 


_— 


a Dd een en an en ea Gen ER ER MD 


_ 


_— 


_—_ ee in in in ien a ae en en On Or Cd 


(5) 


(5) 


ahd 
„0 


jn Ee en On En Bn OB nn on 


16 (21) 


ië 


ië (21) 


Ged bod 


en en On en en Oe en B II 


ne ee OP 
> © 
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DEC SP 

DI 

DIN. êrerr 
El 


EX (SP) „Kl 
EX (SP), IX 
EX (SP) „IV 
EX AF,AF 
EX DE HL 


EXX 


IN A, (C) 
IN A, ($bb) 
IN B,(C} 
IC, (C) 
IN D, 10) 
IN E‚{C) 
INF, (0) 
IN H‚ (0) 
IN L,(C} 


INC (Hiò 

INC (iX+kao) 
INC (IY+&co) 
INC Â 

INC 5 

INC BE 

INC C 


208 


ED 46 


ED Sá 


ED SE 


ED 78 
DB bb 
ED 40 
ED 46 
ED 50 
ED 58 
ED 70 
ED bû 
ED 68 


34 
DD 34 oo 
Fò 34 oo 


ed 


_ ne ‚ 


had 


se pt ne ne 


ne ae ee ee ae 


ze nd et ne ne 


nr 


Cel Cd Cl Cd Cl Col Cl Cl del 


a en en On Or Cl 


INC D 
INC DE 
INC E 
INC H 
INC HL 
INE Ik 
INC IY 
INC L 
INC SP 


IND 
INDR 
INI 
INIR 


JP (KL) 

JP UD 

JP U) 

JP $hhLl 

JP C,$hh11 

JPM, Shi 

JP_NC,$hhL1 
JP NZ,Shhli 
JP P‚$hhil 

JP PE, $hhii 
JP PO,$hhL1 
JP 2,$hall 


JR Errrr 

JR C,êrrrr 

JR NC,@rrrr 
JR NZ, êrrrr 
JR lêrrrr 


LD (BC) ,A 
LD (DE) ,A 
LD (HL) ,A 
LD (HL) „B 


A ed 


0 


a ne en 


wee 


nd es 


Ged Cel Cod Cod Urd Cl Od Cl CA OI MI 


Ged Cd Ged Cl Cod 


ha nt AI PI 


(5 


(5) 


(2} 
(2) 
(2} 
(2) 


On nn en On En Ee On 
SS 


_— 
o 


(21) 


(21) 
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LD (HL),C 

LD (HL) ,D 

LD (HL) ,E 

LD (HL) ‚H 

LD (HL) ‚L 

LD (HLì „$bb 
LD (i{+&oo) ,À 
LD (Ié+&ao) „B 
LD (IXtZao),C 
LD (IÌ+&oo) „D 
LD (IX+kao),E 
LD (IX+&oo) ‚H 
LD (iX+taal ‚L 
LD {1X+%oo) „$bb 
LD (iY+&oo) ‚A 
LD (IY+&oo) „B 
LD (IY+&ao) „C 
LD (IY+&oo) ‚D 
LD (IY+koo) „E 
LD (IY+&ao) ‚H 
LD (I%+tao) ‚L 
LD (IY+koo) „$bb 
LD ($hall),A 
LD ($hhl1},BC 
LD ($hhiì),DE 
LD ($hhilò,HL 
LD (Shhii), Ik 
LD ($hhLl),IY 
LD ($hhili,SP 
LD A, (BC) 

LD A, (DE 

LD A, (HLò 

LD &,{IX+&oo) 
LD à, (IY+&ao) 
LD A, ($hhl1) 
LD Â,A 

LD A,B 

LD AC 

LD A,D 

LD A,E 

LD A, 
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DD 36 oo 
FD 77 oo 
FD 70 oo 
FD 71 oo 
FD 72 oo 
FD 73 oo 
FD 74 oo 
FD 75 oo 
FD 36 oa 
32 11 hh 
ED 43 1] 


DD 7E oa 
FD 7E oo 
3A 1Ì hh 


se ne nt ne nde Oe nb Oe ne de ze bt de a ne a 


ee nn en ee Be CN OC PI IO Or Cr NO On CC EN Nn EN EN EN EA CN EN EN CA CH OC EN CA CA PI PI PI PI PI 


LD A‚1 ED 57 RROOR- E 2 | 
LD A‚L Dee ES 1 4 
LD A,$bb Ebb  ------ 3 2 7 
LD A‚R ED SF RROOR- Lj 7 9 
LD B, (Hi) Abee ES 2 7 
LD B, (IX+&oo) DBA ens * 5 19 
LD B, (IY+&oo) FD4boo —------ + 5 19 
LD B,A eeens Ei 1 4 
LD B,‚B 4Ô E i 4 
LD B,C 8e En 1 á 
LD BD DJ OO Oes £ 1 4 
LD B,E Eee + 1 á 
LD B‚H AA E 1 4 
LD BL 5 eee E) ï 4 
LD B,$bb 0bbb _  ------ E 2 7 
LD BC, ($hhiì) ED 4B1Ì hh ------ ES b 20 
LD BC, $hhil OL II hhh ----ee El 3 10 
LD EC, (HL) 4E ee + 2 7 
LD C, (IX+kao) DD 4E oe  -----e * 5 19 
LD C,(IY+&aa) FD4Eoo ------ 4 5 19 
LD C‚Â 4E E3 | â 
LD C,B B Dee E | Fi 
LD CE 49 ee ES Ì 4 
LD CD BA eee El L 4 
LD C,E B ee £ Î 4 
LD C‚K Cee E 1 4 
LD CL De F3 1 4 
LD C‚$bb OEbb De ES 2 7 
LD D, (HL) B Oee - 2 7 
LD D, (1{+&ao) DD 56 oa —-=---== Ei 5 19 
LD D, (IY+koo} FD5boo —-----e E 5 19 
LD D,A eins - 1 4 
LD D,B 0 Oee E í 4 
LD D,C U Oee ES í 4 
LD DD U me E H 4 
LD D,E Bee ES i á 
LD D‚H A eee F3 Î á 
LD DL hadde ES i 4 
LD D,$bb i6bb F3 2 7 
LD DE, ($hhli) ED SBI hh -—------ E) b 20 
LD DE,$hhL1 MAM OZ EE E3 3 10 
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LD E‚ (HL) 

LD E‚(IX+&oo) 
LD E‚(IY+tao) 
LD E‚A 

LD E‚B 

LD E‚C 

LD E‚D 

LD E,E 

LD E‚H 

LD E‚L 

LD E‚$bb 

LD H‚ (HL) 

LD H‚ (IX+&oo) 
LD H‚ (IY+&oo) 
LD H‚A 

LD H‚B 

LD H,C 

LD H‚D 

LD H‚E 

LD H‚H 

LD H‚L 

LD H‚$bb 

LD HL, ($hhil) 
LD HKL,‚$hh1l 
LD I,A 

LD IX, ($hh11) 
LD 1X,$hh1l 
LD IY, ($hh11) 
LD IY,‚$hh1l 
LD L, (HL) 

LD L,(IX+&koo) 
LD L,‚(IY+&ao) 
LD L‚A 

LD L‚B 

LD L,C 

LD L‚D 

LD LE 

LD L‚H 

LD L‚L 

LD L,‚$bb 

LD R‚A 
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SE 
DD 5E oo 
FD 5E oo 


DD &é oo 


2Â 11 hh 
21 1Ì hh 
ED 47 

Dö 2A 11 
DD 2 1 
FD 2A 11 
FD 21 1 
bE 

DD &E oo 
FD éE oo 


hh 
hà 
hh 
hh 


eo a Oe ae On ne Oe Oe Oe Oe OO Onde Or ne Oe ae ee Or ne pe On nt On Oe Ot de de re de ok a ee ne ae 


De en ie en ee en ee CN OC AI en On on Oe IN en en en ae aen en en EN OT PI Ie ae ee ae en ae ee KN EN PI 


ee ee 
0 0 


od En en en en En 


LD SP, ($hhi1) ED IB Ih ------ k 6 20 

LD SP,$hhil Uhh vet EO 10 

LD SP ‚HL PI eene tt 6 

LD SP, 14 DR OO Teen  & 10 

LD SP, If DR OO vee tE 3 10 

LOD ED AB --00R- 2 4 1 
LDR ED 98 sci a Vi ù UD 
LDI ED A --00R- 8 4 16 
LDIR ED B0 =-0ÔR- Et 54 21 6d 
NES ED 44 RRRIRR +4 2 8 

NOP Ü OO mmm tt 4 

OR (HL) En RROORO #2 7 

OR (1X+too} DD 86 oo RROORO #5 19 

OR (1Y+kaal FD Bé oo RROORÒ 4 5 19 

OR A 87 RROORO 1 1 4 

OR B 80 RROORO 4 1 4 

OR C El RROORÒ 4 1 4 

OR D 62 RROORO 4 1 4 

ORE 83 RROORÒO «€ 1 4 

OR H B RROORO 4 1 4 

OR L 85 RROORÒO 4 1 4 

OR $bb Fé bb RROORO + 2 7 
OTDR ED 88 steen & ME 
OTIR ED 83 sieren Ve Wk HED 
OUT (C),A DR OO vre E & 

OUT (C},B DL eene b À 2 

OUT (CC BR  -eeeee e à 2 

OUT (C),D DU  ---eee 8 3 2 

OUT (C),E BR ennen Ee 3 2 

QUT CC1,H Di semen k 12 

OUT (CIL EDR eee Et 3 12 


OUT ($bb) ‚A 
OUTD 
OUTI 


POP Af 
POP BC 
POP DE 
POP HL 
PoP IX 
PoP IY 


PUSH AF 
PUSH BC 
PUSk DE 
PUSH HL 
PUSH IX 
PUSH IY 


RES Ô, (HL) 

RES 0, (1X+kao) 
RES Ò, (IY+koo) 
RES Ò,A 

RES 0,B 

RES 0,C 

RES 0,D 

RES 0,E 

RES Ó,H 

RES Ô,L 


RES 1, {KL} 
RES 1,{IX+koo) 
RES 1, (iY+kao) 
RES 1 
RES | 
RES Î 
RES 1,£ 

Î 

| 

I 


_ 


n= SE PN ES CI U DD 


RES 
RES 
RES 


' 
Li 
ki 
: 
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C3 Bé 
DD CB 
FD CB 
CB 87 
CB 80 
CB 31 
C5 82 
CB 53 
CB 84 
CB 85 


[B BE 
DD CB 
FD CB 
CB Af 
CB 88 
CB 3% 
C3 3â 
CB SÈ 
CB 8E 
CB 5D 


ve de a 


se a OO re 


on a ae ok ne OO ae on 


den De Cod Cd Cd Cod 


„En Bn Crd rd rd Cl 


md RI RI RI PI PIR Or Ce Bn 


Da PI RI RI MI PI RI Oe Cr De 


ne 
cl CN 


cel 


em 0 MD MV MW DW MW PI 


RES 2, (HL 
RES 2,t1X+koo} 
RES 2, (1Y+koo) 
RES 2,4 

RES 2,8 

RES 2,C 

RES 2,D 

RES 2,E 

RES 2,H 

RES 2,L 


RES 3, (HL) 

RES 3, (1X+koo) 
RES 3, (IY+&oo) 
RES 3,Â 

RES 3,B 

RES 3,C 

RES 3,D 

RES 3,E 

RES 3,K 

RES 3,L 


RES 4, (HL) 
RES 4, (IX+koa) 
RES 4, (IY+Loo} 
RES 4,A 

RES 4,B 

RES 4,C 

RES 4D 

RES 4,E 

RES 4,H 

RES 4,L 


RES 5, (KL) 
RES 5, (14+%a0) 
RES 5, (1Y+koo) 
RES 5,Â 

RES 5,B 

RES 5,C 

RES 5,0 

RES 5,E 


CB % 
DD CE 
FD CB 
CB 97 
CB 90 
CB $1 
CB 92 
CB 93 
CB 94 
CB 95 


CB JE 
DD CB 
FD CB 
CB IF 
CB 98 
CB 99 
CB 9 
Ch 98 
CB 9 
CB 5D 


CB A6 
DD CB 
FD CB 
CB A7 
CB AO 
CB Al 
CB A2 
CB A3 
CB A4 
CB A5 


CB AE 
DD CB 
FD CB 
CB AF 
CB AB 
CB A3 
CB AA 
C5 AB 


oo % 
oo % 


_ nn 


nn 


„nn 


On de an Or Oe Ot On sn ae nn ae on se nn 


on ae Oe ae de OO a 


ee ee a ee 


PI MI PI PI RI RI OO Be ee a nn nd BI RI PI RI RI RI RI OD Cr Be 


aa a ad 
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RES 5,L CBAD ee + 2 

RES 6, HL} BB  -----e + á 15 
RES 6, (IX+koo) DD CB oo B ------ + 6 23 
RES 6, (IY+&oo) FD CB oo Bô ------ 1 ô 23 
RES b,À CBB ee > 2 8 

RES 6,B CBB OT Ei 2 8 

RES 6,C BN * 2 8 

RES 6,D BR ee 3 2 8 

RES b,E CBB Oe 1 2 8 

RES b,H BH OO ---e + 2 8 

RES ó‚L CBES eee Ei 2 El 

RES 7, (HL BBE Oe E 4 15 
RES 7, (IX+%oo) DD CH oo BE ------ * 6 23 
RES 7, (IY+&oo) FDCEooBE ------ Ei 6 23 
RES 7,4 CBBF Oee + 2 8 

RES 7,8 CBR  --- ee ‘ 2 8 

RES 7,C CER OO + 2 8 

RES 7,0 CBB Oee + 2 8 

RES 7,E BB ee + 2 e 

RES 7,K BBC OO O-- ee + 2 8 

RES 7,L CBB ee E 2 8 

RET CR Ed 3 1ó 
RET C eee 1 st t (5) 
RET M FB ee * 3 1 (5) 
RET NC Dee 4 3 (1) t (5) 
RET NZ est + st 4-45) 
RET P FO eee + 3 1 (5) 
RET PE EB eee * 3 1 (5) 
RET FO El eee * zus AEO 
RET 1 B Oee * 3) 1 (5) 
RETI EMD eee + 4 1ä 
RETN ED45 eee + 4 14 

RL (HL) CB 16 RROORR E 4 15 

RL (IX+koo) DD CB oo 16 RROÒRR ‘ 6 23 
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RL (IY+&oo) 
RL À 
RL B 
RL C 
RL D 
RL E 
RL H 
RL L 


RLA 


RLC (HL) 

RiC (1X+400) 
RLC (IY+&oo) 
RLC A 

RLC B 

RLC C 

RLC D 

RLC E 

RLC H 

RLC L 

RLEA 


RLD 


RR (HL) 

RR (IX+&ao) 
RR (IY+&oo) 
RR A 

RR B 

RR C 

RR D 

RR E 

RR H 

RR L 


RRA 
RRC (HL) 


RRC (1X+&00) 
RRC (1Y+&oo) 


FD CB oo 16 
CB 17 
CB 10 
CB 11 
CB 12 
CB 13 
CB 14 
CB 15 


DD CB oo 06 
FD CB oo 06 


DD CB oo 1E 
FD CB oo 1E 


CB OE 
DD CB oo HE 
FD CB oa OE 


RROORR 


RROORR 


RRÓORR 
RRÓORR 
RROORR 
RROORR 
RROORR 
RROORR 
RROÓORR 
RROORR 
RROORR 
RROORR 


Ee: 
RRÔORR 


RRÔORR 
RROORR 


al oe On ae ne OR Oe hal sk ne ok ne Oe On ae 


ae ae a a 


Pa PI AI PI RIO Cr nn _— a RI A IP Oe Oe De _— ee nn an en ad 


_— 


ed 


ct 


co Mm 0 MOM MW MDM MO nI 
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RRC À 
RRC B 
RRC C 
RRC D 
RRC E 
RRC H 
RRC L 


RRCA 
RRD 


RST 00 
RST 08 
RST 10 
RST 18 
RST 20 
KST 28 
RST 30 
RST 38 


SBC A, (HL) 

58E A, (IX+koo} 
SBC A, (IY+&oo) 
SBC A‚À 

SBC A,B 

SBC Â,C 

SBC A‚D 

SBC A,E 

SBC AK 

SBC A‚L 

SBC A,$bb 

SBC HL,BC 

SBC HL,DE 

SEC HL, HL 
SBC Hi,SP 


SCF 


SET Ô, (HL) 
SET Ò, (1X+%00) 
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CB Cé 


RROORR 
RROORR 
RROORR 
RROÓRR 
RROORR 
RROORR 
RROORR 


„0d 


RROORR 


DO 4 WW VW DD DD W MW W MW zo WW DO DO 
zo 0 mW MW VW WV MW DD MD U WW WW MM 
ZU ZU WW MW ZU ZO ZO FO ZU ZU ZU ZH ZO 2 ZU 
en en et en en en et nn et gn en gn a 
zo Zo zo ZU zo Wo ZU ZO ZO ZU WW WO ZI 
Wo W VW VW WV DV DD DD OD 0 WO VW 0 0 


zn Gee 


ee ae te a 


_ 


ne en ne de ee ae 


ee ae de nn a nk a 


JPJ HI RI RI RI RI 


oe 


an 


Ged Cd Cl Cl Cl Cd Cl Cd 


En De oe Be Ie a ee en ee en A U NI 


eo CO Co Co co 0 cn 


0 


en En in Bn en De Ee en ee 


ml 


me ee 
en en en cn 


23 


SET 0, (1Y+koo) 
SET 0, 
SET 0,8 
SET 0,C 
SET 0,D 
SET 0E 
SET OH 
SET Ot 


SET 1, (RL) 

SET 1, (iX+&o0) 
SET 1, (IY+kao) 
SET 1,A 
SET L,B 
SET be 
SET 1,D 
SET 1,E 
SET 1,H 
BET tt 


SET 2, (HL) 
SET 2, (IX+too) 
SET 2, (1Y+koo) 


SET 3, (HL) 

SET 3, (1X+koo) 
SET 3, {1Y+koo) 
SET 3,A 

SET 3,8 

SET 3,C 

SET 3,D 

SET 3,£ 

SET 3,K 

SET 3,L 


FD CB 
CB C7 
CB CO 
CB Ci 
CB C2 
CB E35 
CB C4 
CB C5 


CB CE 
DD CB 
FD CB 
CB CF 
CB CB 
CB Cô 
CB CA 
CB CB 
CB CC 
CB CD 


CB Dé 
DD CB 
FD CB 
CB D7 
CB DÒ 
CB Di 
CB D2 
CB D3 
CB Dt 
CB D5 


CB DE 
D CB 
FD CB 
CB DF 
CB D8 
CB D9 
CB DÀ 
CB DE 
CB DC 
CB DD 


oo Cé 


„nn 


on nt se Oo nk Ot One Ok ode ae On OO fn ae 


Oe Oe se Oo One OM Oue OO Ok 


ne a Oe ae Ok se OO ak 


PI PI PI MI PI RI RIO Oe B PI PI PII RI IO Oe he ra ra ra hr Oo 


ho RI PI PII Oe Ee On 


ee 


eo CO 0 MO MW MD WO 
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SET 4, (HL) 
SET A, (1X+&oo) 
SET 4, (1f+koo) 
SET 4,Â 

SET 4,8 

SET à,C 

SET 4,D 

SET 4,E 

SET 4,H 

SET á‚L 


SET 5, (HL) 

SET 5, (1X+koo) 
SET 5, (1Y+kao) 
SET 5,Â 

SET 5,B 

SET 5, 

SET 5,D 

SET D,E 

SET 5,H 

DET Ost 


SET &, (KL) 
SET &, (1X+koo) 
SET &,(14+hao) 
SET 5,4 
SET 6,5 
SET 5,£ 
SET &,D 
SET b,E 
SET &,H 
SET ó,L 


SET 7, (KL) 

SET 7,(IX+koo} 
SET 7, (1Y+kao) 
GET 7,A 

SET 7,8 

SET 7, 

SET 7D 

SET 7,E 
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CB E6 
DD CB 
FD CB 
CB E7 
CB EO 
CB Ei 
CB E2 
CB E3 
CB Eâ 
CB E5 


CB EE 
DD C8 
FD CB 
3 EF 
CB EB 
Cô ES 
CB Eâ 
CB EB 
CB EC 
CB ED 


CB F6 
DD CE 
FD CB 
[B F7 
CB FO 
CB Fi 
CB F2 
CB F3 
CB Fâ 
CB F5 


CB FE 
Do CB 
FD CB 
CB FF 
CB F8 
CB F? 
CB FA 
CB FB 


oo E 
oo E& 


a al a ne ae de ne ne ee ne ne ae re ae 


ne a on ae ae 


ee naad 


Pa na PJ Mm MI RI Cr Or Be ha PI MI HI RI RI RI Or Oe On 


ee a ale 


SET JH 
SET 7,L 


SLA (hL} 

SLA (IX+&oc? 
SLA (1Y+&oo) 
SLA A 

SLA B 


SLI (HL) 
SLI (IX+koo) 
SLI (IY+&oo} 


SRA (HL) 
SRA (IX+4oo) 
SRA (IY+kaoò 


SRL (HL) 

SRL (IX+%00} 
SKL (IY+&oo) 
SRL À 

SRL B 


CB FC 
CB FD 


CB 2 
DD CB oo Zó 
Fù CB oo 2% 
CB 27 
CB 20 
CB 21 
CB 22 
CB 23 
C3 24 
CB 25 


CB 36 
DD CB oo 3ó 
FD CB ao Jé 
CB 37 
CB 30 
CB 3! 
CB 32 
CB 33 
CB 34 
CB 35 


CB 2E 
DD CB oo 2E 
FD CB oo 2E 
CB 2F 
CB 28 
CB 29 
CB 2Â 
CB 2B 
CB 2C 
CB 20 


CB 3E 
DD CB oo 3E 
FD CB oa 3E 
CB 3F 
CB 38 


RROORR 
RROORR 


RROORR 
RROORR 
RROORR 


RROORR 
RROORR 
RROORR 
RROORR 
RROORR 


hd 


pn se re ne OD One OH a 


ed ed ed ee rd 


ad ed ee en en rrd 


at ne Or aki 


Lied 


PI PI PI PII hd II Or Oe En PJ PI RI RI RI RI On 


PI PI AI KI RI RI RI On On Be 


mn On 


ged Cord CN 


eo ED CO EO MH MO MO nn mn 
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sRL C CB 38 RROORK id 2 8 
SRL D CB Jâ RROORR + 2 8 
SRL £ CB 3B RROORR 1 2 8 
SRL H CB 3C RROORR + 2 8 
SRL L CB 5D RROORR Ld 2 8 
SUB (HL) % RRRIRK id 2 7 
SB (1X+%oo) DD 95 oa RARIRA * 5 13 
SUB (IY+4oo) FD 95 oo RRRIRR + 3 13 
SUB À 97 RRRIRR Ld 1 Ed 
Sub B 9û RRRIAR + Î 4 
SUB C î1 RRRIRR * Î 4 
SUB D 92 RRRIRR t i 4 
SUB E 93 RARIRR t Î 4 
SUB H 9 RRRIRR + Î 4 
SUB L 75 RRRIRK Li Î â 
SUB $bb Dé bb RRRIRR * 2 ij 
XOR (HL) RE RRRIRK id 2 7 
KOR (1X+koo) DD AE aa RRRIRR id 5 i% 
XOR (ÌY+&oo) FD AE oo RRRIRR t 5 13 
XOR A AF RRRIRR * Ì á 
XOR B A8 RRRIKR Li Î id 
KOR C A3 RRRIAR + Ì 4 
XOR D A RRRIKR Li t Kd 
IOR E AB RRRIRR + Î - 
XOR H AC RRRIAR t Î 8 
XOR L âD RRRIRR + i 4 
KOR $bb EE bb RRRIRR 1 2 hi 


[cslVerklaring van de vreende tekens:lraì 

0 « flag wordt op nul gezet 

Lt : flag wordt op één gezet 

= + fìag wordt niet veranderd 

C : carry wordt gekopieerd 

R : flag wordt afhankelijk van het bewerkingsresultaat veranderd 
t : legale 180-instructie 

? « illegale 18ö-instructie (kel gebruikt binnen de HERBYKON!} 


$bb : byte-waarde 
koo : index/offset-waarde 
@rrrr : byte-waarde die een reìatieve sprongcalculatie oplevert 


_ $hhìl : word-waarde ('hh’ is high-byte / '1Ì’ is low-byte) 


Appendix B 


Karaktercodes 
Deciaaal Kex ASCIl-code RESULTAAT ('ChPut') ESCAPE-cade 
0 00 NUL ‘niets’ 
| 01 SOK 
2 2 ST 
3 03 ETX 
4 0ë EDT 
5 05 END 
6 Ûb ACK 
1 07 BEL doe ‘BEEP 
8 (8 BS cursor naar links 
9 03 HT volgende TAB-positie 
iö OA LF cursor omlaag 
ui ÒB VT 
12 0C FF schera schoon en cursor HOME 
13 0D CR cursor zover mogelijk naar links 
14 0E S0 
15 ÓF 51 
16 10 DE 
ij it DEt 
18 12 DC 
18 13 _DE3 
20 14 _DEê 
2i 15 NAK 
22 18 _SYN 
23 17 ETB 
24 18 _CâN 
25 i9 EX 
26 IA SUB 
21 IB ESC naar ESCAPE-groep 
28 iC FS cursor naar rechts 
23 ip 65 cursor naar links 
30 lE A5 cursor oahoog 
Ji IF Us cursor aalaag 
32 20 SP spatie 
65 ál cursar oahoog 
bó 42 cursor onl aag 


223 


67 
68 
&? 
72 
74 
15 
Tô 
7 
82 
106 
103 
120 
i21 
121 
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DEL 


karakter wissen 


cursar naar rechts 

cursor naar links 

wis schera en cursor HOME 
cursor KONE 

wis tot einde van scherm 
wis tot einde van regel 
voeg regel tussen 

wis regel 

geef cursor-coôrdinaten 
wis schera en cursor HOME 
wis regel 

verander cursor 

verander cursor 


/ 2 2 
En 
eens BE 


3 
ES 
4 
Ss 


E 


95 &HSF 6 100 &H64 
Kij | 
105 &H69 109 &H6D 


E 
5 


5 
5 
2 
e 
z 
5 
S 


riateteie 


El 
hd 
E 
el 


8 


226 


239 AHEF 


248 &HF8 


DE: 


Ef 


177 &HB1 


186 &HBA 


Di 


249 &HF9 


178 &HB2 


187 &HBB 


HH 


205 &HCD 


HEt 
Bi 


214 &HD6 


223 &HDF 


E 


232 &HES 


241 &HF1 


250 &HFA 


En 


Eh 


251 &HFB 


Ë 


216 &HDS 


B 


225 &HE1 


8 


243 &HF3 


f 
E 


252 &HFC 


8 


ERE 
H HH 
MEH 


154 &HIA 


| j 


163 &HA3 
tl 


172 &HAC 


Ë | 


181 ves 


À 


253 &HFD 


a H Ë EE 
ti HH 


Ĳ 


de 


derd 


155 &H9B 


164 &HA4 


Er | 
dee 

t | 
173 &HAD 


182 &HB6 


245 &HFS 


254 &HFE 


165 &HAS 
TE 


174 &HAE 


MIT 


201 HCI 


Ti Hi 
210 &HD2 211 &HD3 
219 &HDB 

1 

f ; | 
asss 
228 AHE4 


ri 
HH 


Ì 
0: 
| 


237 &HED 


246 &HF6 247 &HF7 


En 


255 &HFF 


Symbol 


f Ef dE 8 
Kad Kk 


6B A&H44 69 BH45 70 BH46 71 &H47 72 B&H4B 73 &H49 


kt 1 E 
80 &H50 


8 88: 


Code 65 &H41 


ree 


87 _&H57 


En 
KLE 


84 &H54 


en 


91 &H5B 


$ 
+ 
…. 
+ 
+ 
+ 


EO HE 
BEE EM EEH 


93 &HSD 94 &HSE 95 &HSF 


ho 
ha 
_l 


Appendix C 
De memory-map 


De memory-map 


De memory-map onder HERBYMON, na CLEAR 200, &H9FF 


s0088 ò 


ienke System 
sub ROM 


BASIC-programma 


Niet in 
gebruik 


Z88-stack 


HERB YMON 


gebruik 


Werkgebied 


54000 5 


$8008 > 


SF168 5 
sF388 5 


228 


welasiade “n Systen 
sub ROM 
BASIC 


BASIC-programma 


Niet in 
gebruik 


Z80-stack 
Werkgebied 


Appendix D 
Kleurentabel 


transparant 
zwart 

roen 

ichtgroen 
donkerblauw 
lichtblauw 
donkerrood 
hemelsblauw 
rood 
lichtrood 
donkergeel 
lichtgeel 
donkergroen 
magenta 
grijs 
wit 


8 
‘| 
2 
3 
4 
5 
6 
7 
8 
9 
8 
1 
2 
3 
4 
5 


ee ee je je 
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Appendix E 
Video-RAM-tabel 


Tekst C40x24)| Tekst (52x24) [Wigh-Res___ [mu1ti-cotor) 


Patroontabel 
leurentabel 


Sprite-attributentabel 


prite-patroontabel 


Appendix F 
VDP-registers 


mm eerlamelmesfem elen slomzlenslene | 
vop-statwsregister erweer | sorver cores | umersnenene | 
moderesistere Jeje Je je Te Te ee eel 
En NE 
eseresietere je __|e | 
moseretster Je Te Ie Ie Ie eenen 
moderesister 5 || 


Bit 7-MSB en Ort © '/m B van LSB voor sprite-attributen 


border=kieur (transparant) 


Mode-register 6 


Mode-register 7 


L = lees gegevens 
S = schrijf gegevens 


Overige IO-adresgebi eden: 


$00-$7F - niet gedefinieerd 
$B0-$CF — systees 

$D0-D7 - floppy disk-controller 
$D8-$FF - niet gedefinieerd 
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Appendix G 
PSG-registers 


Cn Bits Jeez Per pio 


Reezer ijn Je pe Pe Ee 
Resizer 2 [raare 


EN CC NE 


Register 15 


De PSG-registers 


Golfvormen 
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Appendix H 
IO-adressen 


Device [Adres [Gebruik [ mschrijving omerkingen 


B251A 
(USART) 


Strobe Centronics 
Status 
Data 


TMS9129NL 
Conmand/ 
Address set 
Status 


Address Latch |AY-3-8910 


Data-Port A _ |8255A 
Data-Port B 
Data-Port C 

Mode set 
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Appendix 1 
De BIOS-sprongtabel 


Adres 


80000 
$000g 
80d0C 
$0010 
$0014 
80018 
$001C 
$0020 
$0024 
$00zE 
$00r0 
$0038 
$00% 
$00Je 


SetTzt 
Set32 
Set5rp 
Setrit 
CalPat 
Calâtr 
6pSiz 
SrpPrt 
Biclni 
WrtPS6 
RaPS5 
tetiis 
ChsNS 
Chöet 
ChPut 
tptOut 
Lpt5tt 
CavChr 


Functie 


Controieert het RÄM en zeiecteert siots IE 
Controleert een BASIC-karakter 

Leest RAM uit opgegeven slot 

Verzorgt een volgend BASIC-karakter of =token 
Schrijft door in RAM tn opgegeven slot 

Verzorgt uitvoer naar het huidige device 

Springt naar een subroutine in opgegeven slot (e) 
Vergeìijkt de registerparen HL en DE 

Schakelt een geselecteerd slot persanent in 

Geeft het type van zen BASIC-operand 

Spr:ngt naar een subroutine in een ‘afgelegen’ slot 


Harduare-interrupt en keyboard-scan ie 
Initialiseert IO-devices te 
Initzaliseert funct:etoetsen te) 


let het schers ‘uit’ 

let het schera ‘aan’ 

Schrijft an een VOP-register Ln 
Haalt een byte uit het video-RAM 

Scarijft een byte naar het videc-Rk 

Initiatiseert de VDP voor een leesopdracht 
Initialtseert de VOP voor een schrijfopdracht 

Vuit zen stuk videcgeheugen set een gegeven waarde 
Kopieert een stuk videogeheugen naar RÈN 

Kopieert een stuk RAN naar het videogeheugen 
Verzorgt de inschakeling van een gewenste VDP-aode 
Veranaert de VÒP-kleuren Lel 
Verzorgt een Non Maskabie interrupt 

Initraliseert alle sprites 

Initiaiiseert de VDP woor tekst-aode 4ûls)24 (4) 
Initzaliseert de VDP voor tekst-aode 32(#)24 (4) 


Initzaliseert de VOP voor high reschutionsaode n.v.t, 


Initialiseert de VPD voor aulticolor-scde 

Stelt de VOP ‚n op tekstaode 40{4324 

Steit de VOP in op tekstaode 4e 152 

Steit de VOP in op high resolutton-aode 

Steìt de VOP an op aulticalor-aode 

Geeft het adres van een sprite-patrccn te) 
Geeft het adres van de sprite-attributen te) 
Beeft de huidige sprite-grootte 

Plaatst een karakter op het grafische schers te 
In:traliseert de P56 te) 
Schrijft in een Pä6-register 

Leest gan PSG-register uit 


Start ket uitlezen van de auziek tri 
Geeft de status van de keyboard-butfer 

Wacht op het invoeren van een karakter ie} 
Voert pen karakter uit naar het schern te) 


Veert een karakter uit naar de printer 
Controleert de printer 
let karakter aet ‘grafische header’ oa 


Invoer 


Hizadres van karakter 


‚ Asslot ID / Kl=adres 


HLzadres van karakter 

Asslot ID / Hlzadres / Ezbyte 
Aekaratter 

IYeslot IB / -adres 

HL / DE 

A=stot ID / HL=adres 

Bevel. 

RST 30 / iD-oyte / adres-uord 
att. 

ovt. 

nvt. 

n.v.t, 

a.vet. 

Bzbyte / C-VDP register 
Hlzadres 

Hlzadres / Azoyte 

Klzadres 

HLzadres 

Wzadres / BC-iengte / Aztyte 
Msbron / DEzobject / BC-iengte 
Hizbron / DEzobject / BC-iengte 
heschere-node 

mev.t, 


nett, 


Bevel, 

evet. 

a.v.t. 

RAS 

n.v.t. 

A=sprite ID 
Azsprite ID 
n.v.t. 

A=tarakter 

nev.t, 

A=P53 register / Ezoyte 
heP56 register 
n.v.t. 

a.v.t. 

nvt, 

Azkarakter (code) 
Azrarakter (code) 
nvt. 
Astarakter 


Uitvoer 


n.v.t.a.v.t. 
Aetarakter / Hlevolgend 
Asbyte 

Astarakter / Hisvolgend 
AAS 

nvt. 
routine-afhankel: jk 
flags eventueel updated 
nevet. 

AFstyge 
routine-afhankel1 jk 
a.v.t 

n.v.t 

nev.t, 

LAAS 

A.v.t, 

n.vet. 

Azbyte 

n.v.t. 

n.v.t, 

a.v.t. 

n.v.t. 

n.v.t. 

nut. 

Nevel, 

a.v.t. 

a.v.t. 

srt, 

nvt. 

nvt. 

Mevet. 

nvt. 

n.v.t. 

a.v.t. 

a.v.t. 

av.t. 

HL zadres 

KLzadres 

Argrootte 

ant. 

LAAR 

nvt, 

Asbyte 

a.v.t, 

zero updated 
Arkarakter (code) 
n.v.t, 

carry updated 

A en zero updated 
tarry en zero updated 


$0ÒRE Pinlin 
$00B1 _Inlin 
$0064 _Qiatin 
$0087 Breakl 
80084 _IsCntc 
$0089 CkCntc 
$00C0 Beep 
$00C3 Cls 
$00C5 Poslt 
8603  Fakio 
$00CC EraFak 
SOOCF DspFnk 
$00D2 Tolext 
$0065 _6tStck 
$6008 _GtIrig 
$00DB _6tPad 
$0ÒDE &tPd1 
$0ÒEL Taplon 
$00E4 Tapln 
$00E7 Taplof 
$00EA _TapOon 
$00ED Taplut 
$00FO Tapdof 
$00F3 Sthotr 
$00r6 Litû 
$00F _Putû 
$00FC Rightí 
$OCFF LeftC 
80102 UpC 
$0165 _TuoC 
$0168 DownC 
$0108 ThounC 
$010E _Scalit 
SOLLI  MapXtc 
$0114 FetchC 
$ÒlI7- StoreC 
$OIIA Setátr 
80119 Read 
$0120 SetC 
$0123 _NSetCi 
$012 Gtäspc 
$6129 _PatIn: 
$012C Scanf 
$0L2F Scanl 
80122 _ChoCap 
$0135 ChgSad 
80153 RSiReg 
$0135 WSlReg 
$OL3E _RdVOP 
80181  Snshat 
80144 _PhyDIJ 
$0147 Foraat 
$0l4â _ IsF1IO 
$0140 DutDiz 
80150 GetvCP 
801535 GetVc2 
$0155 Kilbuf 
$0159 _CalBâ5 


(a): de functie inforzeert en/of verandert net (variabelen)werkgebied 


Leest een bewerkte regel tn 

Leest een bemerkte regel in 

let '? ‘ op het schera en springt naar INLIN 
Controleert op CTRL-STOP 

Contrsieert op SHIFT-STOP 

IsCnte, maar nu door BASIC 

Verzorgt een BEEP 

Maakt het scher schoon 

let de cursor op een bepaalde plaats 

Kijkt of de tekst-functietoetsen ‘aan’ staan 
Haalt de tekst-functietoetsen van het schera 
Tet de tekst-functietoetsen op het schera 
Zet het schers in tekst-aode 

Leest de joystick-stand uit 

Leest de vuurknap-stand uit 

Leest de touch tablet-stand uit 

Leest de paddle-stand uit 

iet cassette-invoer aan en leest header 
Leest cassettesignaal in 

iet cassette-invoer uit 

let cassette-uitvoer aan en schrijft header 
Schrijft cassettesignaal 

let cassette-uitvoer uit 

let cassettesotor aan/uit 

Geeft de ruiate in de auziekstring 

Plaatst een byte in de muziekstring 
Beweegt | pixeì naar rechts 

Beweegt | pirel naar lanks 

Beweegt 1 pizel oahoog 

UPC indien mogel: jk 

Beweegt | pixel omlaag 

DONNC indien ecgel: ik 

let de grafische coördinaten op schaal 
Berekent adres van grafische coördinaat 
Beeft het adres en aaskerpatroon 

Plaatst het adres en easkerpatroon 

Vult het attribuut-byte un 

Leest het attribuut-byte van een pixel 

Vuit het attribuut-byte van een pixel in 
Vuit een aantal pixels horizontaal 

Berekent een cirkelverhouding 

laitzaliseert de PAINT-routine 

Toekt pixels naar rechts 

loekt pixels naar links 

Verandert de status van de CAP-indicator 
Wijzigt de key click 

Leest het primaire slot-register 

Schrijft naar het priaaire slot-register 
Leest het VOP-statusregister 

Leest een rij van de keyboard-aatrix 
Bestuurt de eventueel aanwezige diskórive 
Initialiseert de eventueel aanwezige diskdrive 
Bekijkt het eventuele optreden van device-i0 


Le) 


tn) 


lei 
tes 


te) 
te) 


ter 
te 


Verzorgt geforaatteerde uitvoer naar de printer [#} 


Geeft de pointer van de auziek-string 


te) 


Beeft de pointer van een gemenste suziekvariabele 


Imtraliseert de keyboard-bufter 
Springt naar de BASIC-interpreter 


le) 


n.v.t, 

n.d.t, 

n.vet. 

n.v.t, 

n.v.t. 

LAAN 

nev.t, 

zero 

H-kalom / Leregel 
n.v.t. 

n.v.k, 

nvt. 

n.vet, 

R=joystick ID 
A=vuurknap ID 
A=tablet [D 

A=paddle 1D 

n.v.t, 

n.v.t, 

nevel, 

Azheader type (Ozkort) 
k=dyte 

a.v.t. 

Azactie (Osstop / lestartt 
A=array-nunaer 
Azarray=nuamer / Ezoyte 
nevel. 

a.v.t. 

n.vet, 

nvt, 

n.v.t, 

nvt. 

BC K-coôrd. / DE Y-coörd. 
BE K-coörd. / DE Y-coûrd. 
a. vet, 

Azaaster / HL=adres 
A=tleur 

n.v.t. 

nvt, 

HLstel ler 
n.v.t.DEzâspCti / HL=âspCt2 
A=tleur 

B-flag / DE=teller 
B-flag / DE=teller 
A=aan/uit (Ozuit) 
Azaan/uit (Ozuit) 
n.v.t, 

A=tyte 

n.v.t, 

Azregel 
10-afhankelijk 
10-afhankelt jk 

nvt. 

A=karakter (code) 
A=kanaal 

Leorte 

n.vet. 

M-adres 


Klzadres / carry updated 
Klzadres / carry updated 
HLzadres / carry updated 
carry updated 

n.vet. 

av.t. 

nvt. 

nvt. 

n.v.t. 

nvt. 

nvt. 

n.v.t. 

n.v.t. 

Asrichting 

Azvuur (O-niet) 
Asmaarde 

A=waarde 

carry updated 

Asnyte / carry updated 
nev.t. 

carry updated 

tarry updated 

n.v.t. 

A.v.t. 

HL=ruiate 

zero updated 

neet. 

hevel. 

nev.t. 

carry updated 

nvt. 

Carry updated 

carry updated 
Hizadres / Àspatroon 
Kl=adres / A=patroan 
nuv.t, 

carry updated 

Rekleur 

RAS 

nv.t. 


n.v.t. 

DE=teller / C-flag 
DE=teller / C-flaq 
nav.t. 

a.v.t. 

Aebyte 

n.v.t. 

A=status 

Asstatus 
10-afhankelt jk 
10-afhankel: jk 
Fztype [0 

nevel. 

Klzadres 
HL=pointer 

av.t. 
BASIC-afhankel ijk 


235 


Appendix J 
Het werkgebied 


Adres Naaa Type Functie 

$F3B0 RdPrin R Slat-schakeling en uitlezen (priaair) 

$F585 WrPria KR Slot-schakeling en wegschrijven (primair) 
$F38C ClPria R Slat-schakeling voor CALSLT 

$F39A _Usr0 Lj Adres Usr0 (default ILLEGAL FUNCTION CALL) 
$F39C Usri h Adres Usrt (default ‘ILLEGAL FUNCTION CALL’) 
$F39E Usr2 Â Adres Usr2 (default ‘ILLEGAL FUNCTION CALL’) 
$F3â0 Usr3 - Adres Usr3 (default ‘ILLEGAL FUNCTION CALL) 
$F3A2 Usr4 Â Adres Usr4 (defauit ‘ILLEGAL FUNCTION CALL’) 
$F3âä Usr5 Adres Usr5 (default ‘ILLEGAL FUNCTION CALL’) 
$F3A6 Usr6 A Adres Usrá (default ‘ILLEGAL FUNCTION CALL’) 
SF3À8 Usr? â hdres Usr? (default ‘ILLEGAL FUNCTION CALL’) 
$F3AA UsrB Â Adres Usr8 (defauit 'ILLESAL FUNCTION CALL ') 
SF3AC Usr? â Adres Usr9 (default ‘ILLEGAL FUNCTION CALL} 
SFIRE Linl40 VW Scherabreedte in 40424 tekst-acde (default 37) 
$F3AF Linl32 V Scherabreedte in 32424 tekst-acde (default 29) 
$F3B0 Linten V Actuele schermbreedte (wordt tijdens schera-inschakeling gekopieerd) 
$F3B1 

$F3B2 Clatst V Ruiate voor PRINT-functie (default 14) 

$F3B3 TxtNam A Namentabel (40424) (default $0000) 

$F3B5 TxtCol A Kleurentabel (40424) (defauit $0000) 

$F3B7 TxtCgp À Karakterset (40#24) (defauìt $0800) 

$F3B9 TxtAtr A Sprite-attributen (40824) (default $0000) 
$F3BB TxtPat A Sprite-patranen (40#24) (defauìt $0000) 

$F3ED TJ2Naa A Namentabel (32424) (default $1600) 

$F3BF T32Caì A Kleurentabei (32424) (default $2000) 

3F3C1 T32Cgp A Karakterset (32424) (default $0000) 

$F3C3 TJ2Atr A Sprite-attributen (52424) (default $1B00) 
$F3C5 TI2Pat A Sprite-patronen (32424) (default $3800) 

$F3C7 GrpNaa A Naaentabel (hires) (default $1300) 

$F3C3 GrpCol A Kleurentabel (hires) (default $2000) 

SFICB GrpCgp A Karakterset (hires) (default $6000) 

$F3CD Brpâtr A Sprite-attributen (hires) (default $1B00) 
$F3CF GrpPat A Sprite-patronen (high res) (default $3800) 
$F3D1 MitNaa A NamenTabel (multicolor) (default $0800) 

$F5D3 MltCoi A KleurenTabeì (aulticolor} (default $0000) 
$FSD5 MitCop A Karakterset (aulticolor) (defauit $0000) 

$F3D7 NitAtr A Sprite-attributen (aulticalar) (default $1800) 
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$F3D9 
$F3DB 
$F5DC 
$F3DD 
SF SDE 
$FSDF 
$F3EO 
$FJEL 
$F3E2 
$F3ES 
$F3EÀ 
$F3ES 
$F3ES 
$F3EL 
$F5EB 
$F3EI 
$F3ER 
$FJEB 
$F3EC 
$F3EF 
$F3F2 
$F3F3 
SFSFS 
$F3FE 
$F3F7 
$F3r8 
$E3FÀ 
$FSFC 
$F 401 
$F406 
$F408 
$F40Â 
$F40B 
$F40D 
$FA0F 
$F414 
$FA15 
$Fâl6 
$F417 
$F418 
$F419 
$FALB 
$FA1C 
$F Air 
$FSSE 
$F561 
$F662 


MltPat 
ClikSu 
CsrY 
CsrX 
EnsDíg 
RgûSav 
Rg15av 
Rg25av 
Rg3Sav 
Rg4Sav 
Rg5Sav 
RgéSav 
Rg75av 
StatF1 
IrgFìg 
ForClr 
BakClr 
BorCir 
Haxlipd 
MinUpd 
AtrByt 
Queues 
Frchew 
ScnCnt 
RepCnt 
PutPnt 
BetPnt 
C51200 
Cs2400 
Lom 
High 
Header 
AspCt! 
AspCt2 
EndPrg 
ErrFlg 
LptPos 
PrtFlg 
NENSXP 
RanPrt 
Vlzâdr 
VizDat 
CurLin 
KBuf 
Buf 
TtyPos 
Diaf1g 


Ss ewwersssesse<neEseesc > ure Pe<nnEeeeeseeseeeeesSsSseCPe 


Sprite-patronen (aulticolor) (default $5800) 

‘Klik’ bij druk op toets 

Verticaalcoördinaat van de cursor 

Horizontaalcoôrdinaat van de cursor 

Functietoetsen op het schera? (Òzniet) 

Kopie VDP-register Ò (default $00) 

Kopie VOP-register 1 (default $FO) 

Kopie VDP-register 2 (default $00) 

Kopie VOP-register 3 (default $00) 

Kopie VDP-register à (default $01) 

Kopie VOP-register 5 (default $00) 

Kopie VDP-register 6 (default $00) 

Kopie VDP-register 7 (default $F4) 

VDP-statusregister (default $CA) 

Status van alle vuurknoppen 

Huidige voorgrondkleur (default 15) 

Huidige achtergrondkleur (defauìt 4) 

Huidige borderkleur (default 4) 

Sprong voor LINE-routine 

Sprong voor LINE-routine 

Penkleur voor grafische routines 

Controleblokken voor de drie muziek-arrays 

Fìag voor CLOAD tonderscheid tussen CiOâ) en CLOAD?, =CL5AD) 
Frequentie keybaard-scanning 

Snelheid keyboard-repetering 

Adres van de volgende ‘plaats’-pasitie in de keyboard-buffer 
Adres van de volgende ‘haal'-positie in de keyboard-butfer 
Paraneters vaar 1200 baud-cassette 

Paraneters voor 2400 baud-cassette 

LAAG-cyclus 

KOOB-cyclus 

Cycli in aanloapblok 

Verhouding stralen van CIRCLE 

Verhouding stralen van CIRCLE (default) 

Lege BASIC-regel (voor ‘ON ERROR, ,. ) 

Nunaer van de opgetreden fout 

Positie van de printer-kop 

Uitvoer naar schera of printer? {O=schera / 1=printer) 
Hoe wordt de printer grafisch aangestuurd? 

Hoe worden de grafische karakters naar de printer gestuurd? 
Adres van karakter voor VAL-functie 

Waarde van karakter vaar VAL-functie 

Het regelnumaer dat nu wordt verwerkt door de interpreter 
Becodeerde vara van een ingetypte regel 

Tekst die INLIN heeft ingelezen 

Positie op het schera voor PRINT 

loekroutine voor array-variabelen 
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$F563 ValTyp 
$F564 DoRes 
$F5b5 _DoNun 
$F666 ConTxt 
$F568 ConSav 
$F66? _ConTyp 
$F&éA Conlo 
$F612 MemSiz 
$F67à StkTop 
$Fbib TxtTab 
$F578 TeapPt 
$FolA TeapSt 
$F598 _DscTap 
$F49B FreTop 
$F&D Teapd 
$F5IF Teapd 
$Faht EndFor 
$F6A5 DatLin 
$F5AS SubFlg 
$FbA6 Figinp 
$F&A? _ Teap 
$FSA9 PtrFlg 
$F&AA AutFlg 
$F5kB Autlin 
$F&AD Autinc 
$rahF Savixt 
$F&BI SavStk 
$F6B3 Errlin 
$F4B5 Dot 
$F3B7 ErrTxt 
$F5B9 OnELin 
$FBB OnEFlg 
$FGBC Teap2 
$F&BE Oldlin 
$F5CO OrdTxt 
$F5C2 VarTab 
$F5C4 AryTab 
$F5Cé StrEnd 
$F6CG DatPtr 
$FaCA Def Tbl 
$F5EA PraStk 
$F&EL Pralan 
$FSE3 Paral 
$F74C PraPrv 
SF74E Praln2 
$F750 Para2 
$F7E4 Praflg 


Type van de variabele in DAC 

Flag voor het scannen van een DATA-regel 

Fiag voor omzetten van regeìnuaner 

Âdres voor eerstvolgende karakter NÀ een numerieke constante 
Token-opslag van een nueerieke constante 
Type-opslag van een nuserieke constante 
Opstagruiate voor numerieke constanten 

Top van het stringgeheugen (wijzigen met CLEAR of MAXFILES) 
Top van de stapel (wijzigen met CLEAR of MAXFILES) 
Bodea van het programaageheugen (default $8001) 
Eerstvolgende vrije ruiate in TERPST 

Stringstapel 

String-signalementbufter 

Eerstvolgende vrije ruinte in het stringgeheugen 
Interpreter-ruiate (algemeen gebruik) 
Interpreter-ruigte (algemeen gebruik) 

FOR, „NEXT -werkpointer 

Regelnuaser van huidig DATÂ-statesent 
Variabelenindex 

Flag voor verschil tussen INPUT en READ (O=INPUT} 
Interpreter-ruiate (algemeen gebruik) 

Flag regelnunaeradres 

Flag voor AUTO (O=geen AUTO) 

Huidige regelnuaser tijdens uitvoering van AUTO 
Regelverhaging tijdens AUTO 

Adreswijzer van interpreter 

Adreswijzer van de stapel 

RKegelnunaer indien er een fout optreedt 

Numaer van de laatst behandelde regel 

Buffer voor SAVTÄT 

Adres voor ON. ..ERROR 

Flag voor ON...ERROR ({zerror opgetreden) 
Interpreter-ruiate (algemeen gebruik) 

Regeïibuffer voor pragraama-onderbreking 
Statenent-buffer vaar programaa-onderbreking 
Eerste byte in het variabelengeheugen 

Eerste byte ìn het array-geheugen 

Einde array-geheugen 

Adres van huidige DATA-stategent 

Type van elke groep BASIC-variabelen (A,,,1} 
Startadres van FN-parameters 

Lenate van het FN-blok dat in PARMi staat 

Lokale variabelen van een geevalueerde FN-functie 
Adres van FN-olok 

Lengte van het Fh-blok dat in PARA2 staat 
Variabelenconstructie voor FN-functie 

Flag voor onderscheid tussen globale en lokale variabelen 


wer w<rerPrPrPePerEeEr were erPCCPEEPerPPE PETE 
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$F1B5 AryTa2 
$F7B] _NoFuns 
$F788 Teap? 

$F7BA Funâct 
$F7BC SwpTap 
$F2C4 IrcFlg 
$F7C5 FBuffr 
$F7FO DecTap 
$FIF2 DecTa2 
$FIF4 DecEnt 


Eindadres van het thans doorzochte variabelengeheugen 
Signalering van lokale variabelen 

Interpreter-ruiate (algemeen gebruik) 

Ket aantal FN-functies thans in gebruik 

Buffer voor SWAP-statenent 

Flag voor de TRACE-functie (û=geen TRACE) 

Buffer voor numerieke output 

Tijdelijke opslagruinte voor deeìrcutine 

Tijdelijke opslagruiate voor deelroutine 

Teiler voor deelroutine 


$FIF6 Dac Priaaire buffer voor expressie-evaluatie in de interpreter 
$F306 Hoidd Buffer voor veraenigvuìdigingsroutine 

$F347 Arg Secundaire buffer voor expressie-evaluatie in de interpreter 
$F857 Andi Buffer voor huidige randoa-waarde 


$F85f MaxFil 
$F950 FilTab 
$F862 NulBuf 
$F854 PrtFil 
$F366 FilNaa 
$Fâ71 FiiNa2 
$F37C NioNiy 
$F87D SavEnd 
$F8IF  FnkStr 
$Fif CgPnt 

$F322 NaaBas 
$F324 CgpBas 
$F226 PatEas 
$F923 AtrBas 
$F92A Clac 

$F32C CMâsk 

$F32D Mindel 
$F92F MaxDel 
$F331 Aspect 
$F333 CenCnt 
$F335 CLinef 
$F33é6 EnPats 
$F338 CplotF 
$F339 CpCnt 

$F93B CpCnt8 
$F93D CrcSua 
$F33F CstCnt 
$F341  CsCiXY 
$F342 CSaveÂ 
$F344 CSaveX 
$F345  CXOHF 

$F947  CYOH 

$F943 Lohisk 


hantaì mogelijke 1O-buffers 

Adres van pointer-tabel voor file-controleblokken 

Adres van het eerste byte van de databuffer van IO-buffer 0 
Adres van het file-controieblok van de huidige 10-buffer 
Buffer voor bestandsnaas 

Buffer voor ingelezen bestandsnaaa 

Status voor IO-buffers tijdens LOAD 

Adres voor het laatste byte tijdens BSAVE 

Buffer voor functietoetsen-strings 

Slot en adres voor de te kopiëren karakterset 

Startadres van de huidige naaentabel voor de VDP 
Startadres van de huidige karaktertabel voor de VDP 
Startadres van de huidige sprite-patranentabel voor de VÒP 
Startadres van de huidige sprite-attributentabel voor de VD 
Positie van de laatst verwerkte pixel 

Masker gebruikt tijdens de laatste pixel-operatie 
Minimaal verschil voor LINE-routine 

Maxinaal verschil voor LINE-routine 

Straïenverhouding tijdens CIRCLE 

Teiler voor plot-routine tijdens CIRCLE 

Flag voor CIRCLE-routine 

Aantai segment-punten voor CIRCLE 

Flag vaar CIRCLE-routine 

Y-coördinaat tijdens CIRCLE 

Aantal punten thans geplat tijdens CIRCLE 

Teller voor CIRCLE 

Aantal punten binnen starthaek tijdens CIRCLE 
Afplattings-flag voor CIRCLE 

Tijdelijke ruiate voor SCARR 

Tijdelijke ruiate voor SCHR 

Tijdelijke opslagruiate voor CIRCLE 

Tijdelijke opslagruiate voor CIRCLE 

Tijdelijke opslagruiate vaar PAINT 


eee PrPeLPELP IW PEP PPTE LEENT TP 
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$F94A LohDir V Nieuwe scan-richting tijdens PAINT 

$F94B Lohâdr A Adres van meest linkse uitstulping tijdens PAINT 
$F94D LohEnt V Grootte van linker uitstulping 

$F34F  SkpEnt V Aantal pixels over te slaan tijdens PAINT 

$F951 MovEnt V Aantal bewegingen tijdens PAINT 

$F953 PdiRec V Huidige richting tijdens PAINT 

$F354 LfProg V Flag voor beweging naar links tijdens PAINT 
$F55 

$F256 _MclTab 
$F958 MclFlg 
$F959 _QueTab 
$F971  Quebak 
$F975 Voich? 
SPES Voich3 
$FAI5 VoicCû 
$FAFS _R=210 
$FB55 PrsCnt 
$FD3J6 _SavSp 
$FB38 VoiceN 
$FB33 SavVol 
$FB3D Mcllen 
$FBIC MciPtr 
$FB3E QueueN 


A Adres voor gacro-ontledertabel (DRAWN of PLAY) 
v Flag voor macro-ontledergebruik (DRANK of PLAY) 
P Parameters voor afspelen van muziek (4#5) 
Vv Grootte van de auziek-arrays (41) 

B Muziek-array kanaal A 

B Muziek-arrav kanaal B 

B Kuziek-array kanaal C 

B Rij voor het R5232-kanaal 

v Teller voor de PLâY-routine 

Á Opslag van de 180-stapelwijzer tijdens PLAY 
Vv Numner van het thans gebruikte kanaal tijdens PLAY 
v Opslag van het voluae tijdens een R-verwerking 
v Lengte van de huidige aacro-ontìede string 
h Adres van de huidige gacra-ontlede string 
v Het nuaaer van de thans verwerkte auziek-array 
$FB3F Musick V Fiags voor te verwerken auziek-array{sì 
$EB40 PlyCnt V Aantal opeenvolgende PLAY-statenents 
$FB4L  VchÂ P Paraneters vaar PLAY-routine, kanaal A 
$FB66 VcbB P Paraseters voor PLAY-routine, kanaal 8 

$FBBB VcoC P Paraaeters voor PLAY-routine, kanaal C 

$FBBO EnStop V Fiag voor warae start tijdens interrupt (O=geen warae start) 
$FBDL Baskoe V Flag voor CTRL/STOP-reactie (O=geen ‘reactie) 

$FBE2 LinTtb V Fiags voor het ‘overlopen’ van een scheraregel (24+ 

$FBCA FstPos V De coördinaten van de cursors i,v.a. terugrekening bij ‘overloop’ 
$FBCC CurSav V Opslag van het karakter dat werd vervangen door de cursor 

$FBCD FnkSmi V Bijhouden welke groep functietoetsen wordt afgebeeld 

SFBCE FnkFig V Flags of functietoetsen in werking (108) 

$FBD3 Onâsbt V Aantal interrupts bijhouden (bijv. intussen opgetreden 10 e.d.) 
$FBD9 ClikFl V Flag on te zorgen dat er maar één ‘klik’ tegelijk wordt gegeven 
$FBDA Oldkey B Buffer voor het opslaan van de ‘vorige’ keybaard-gatrix 

$F3E5 Nenkey B Buffer voor het opslaan van de ‘huidige’ keyboard-satrix 

$FEFO Keyäuf B Keyboard-buffer 

$FCIE Linárk B BiOS-buffer om een hele scheraregel op te kunnen slaan 

$FC4Ó Patkrk B BiûS-buffer voor het opsìaan van een @(#)8 pixel-patroon 

$FC48 Bottoa A Laagste RAM-adres (default $6000) 

SFCAA Hiken À Hoogste RAM-adres (default $F3580) 


$FCAC Irpibì Interrupt-veroorzakers 
$FC4C V/A Key 0 
$FCAF v/h Key 1 
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$FC52 
$FC5S 
SPES 

$FC5B 
$FCSE 
$FCôl 
$FCôd 
$FCô7 
$FC6A 
$FC6D 
$FC70 
$FC73 
$FC76 
$FC73 
$FC7C 
$FCF 
$FCB2 
$FCB5 
$FCH3 
$FCHB 
$FCBE 
$FC91 
3EC4 
$FC97 
$FC3B 
$FC3C 
$FCID 
$FCHE 
$FCAO 
$FCA2 
$FCA4 
$FCAS 
$FCA5 
$FCA] 
$FCA8 
$FCAI 
$FCAA 
$FCAE 
$FCAC 
$FCAD 
$FCRE 
$FCAF 
$FCHO 
$FCB! 
$FCH2 
$FCB5 
$FCB5 


IntF1g 
PadYy 
PadX 
Jiffy 
Intval 
IntCnt 
Lont ia 
Windid 
Erphed 
EscCnt 
InsFìg 
CsRSr 
CStyle 
CapSt 
KanaSt 
KanaNd 
FlbMen 
Scr Mod 
OldScr 
CasPrv 
BrdAtr 
GXPos 
6fPos 


V/A 
v/Â 
V/Â 
V/A 
V/A 
Vik 
V/A 
v/h 
v/h 
V/A 
V/A 
V/A 
v/h 
V/A 
v/h 
via 


PPS 


Key 2 

Key 3 

Key 4 

Key 5 

Key 6 

Key 7 

Key B 

Key 9 

STOP 

Sprite 

Strig 0 

Strig 1 

Strig 2 

Strig 3 

Strig 4 

Inter val 

n.g. 

n.g. 

n.g. 

n.g. 

n.g. 

n.g. 

n.g. 

n.g. 

(CTRL/) STOP-detect1ie 

Y-positie touch tablet 

X-positie touch tabiet 

Tisaer 

Tijdsduur voor ON... INTERVAL 

Aftelling i.s.a. ON... INTERVAL 

Duur van startbit bij lezen van cassette 
Tijdsduur hoog/laag-cyclus bij lezen van cassette 
Flag voor grafische header (O=geen grafische header) 
Flag voor ESC-verwerking (O=geen escape-code) 
Flag vaar INSERT-aade (O=geen INSERT) 

Flag voor ‘cursor in beeld’ (Ózgeen cursor) 
Flag voor cursor-type (O=blok / anders=8C234} 
Flag voor ‘Caps Lock’ (Òzgeen ‘Caps Lack} 
Flag voor ‘Kana Lock’ (Op Japanse machines) 
Keyboard-mode op Japanse machines 

Flag voor onderdrukking 10-foutaeldingen 
Huidige schern-aode 

Vorige schera-mode 

Vorig opgeslagen karakter voor cassette 
Randkleur voor PAINT-routine 

Opslag High-Res X-positie 

Opslag High-Res Y-positie 
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$FCB7 Brpâci A Huidige X-positie voor GRPPRT 

$FCH3 Grpâcy A Huidige Y-positie vaar GRPPAT 

$FCB5 DrnFlg V Flag voor DRAW-rcutine 

SFCBC DrwScl VW ‘Scale factor’ voor DRAW 

$FCBD Pruâng V Gebruikte hoek bij DRAW 

$FCBE RunBnf Vv Flag voor BLAOD aet R-parageter (O=geen auto RUN) 
$FCHF SavEnt A Adres voor BSAVE (en BLOAD) 

$FCCL ExpTbì V Flags voor expanded slots 

$FCC5 Sltibì V Huidige toestanden van de expanded slot-registers 
$FCC9 Sltâtr P Parameters vaar uitbreidings-ROMS's 

$FDO9 Sitürk B Mogelijk werkgebied voor uitbreidings-ROM's 

$FD83 Pracha B Naam van een stateaent of apparaat i.v.a. uitbreidings-R0M's 
$FD39 Device V Device-ID voor een uitbreidings-ROM-adres 

B: buffer 

P: paraaeters 

R: routine 

5: sprong 

V: variabele 
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Appendix K 
HOOKS 


Adres 


$FD3A 
$FD9F 
$FDAA 
$FDA} 
SFDAE 
$FDB3 
$F DES 
$FDBD 
$FDC2 
$FDC7 
$FDCC 
$FDDi 
$FDD6 
$FDDB 
$FDEO 
$FDES 
3FDEA 
$FDEF 
$FDF4 
$FDFS 
SFDFE 
$FEOS 
$FEO8 
$FEOD 
$FEL? 
$FEL 
$FEIC 
$FE2L 
$FE26 
$FE2D 
$FE3O 
$FE3S 
$FESA 
s$FE3F 
$FE44 
$FE4Q 
SFE4E 


Naaa 


KH. Tial 
HK. ChPu 
H.DspC 
H.EraC 
H.DspF 
H.Eraf 
K. ToTe 
K.Ch6e 
KH. IniP 
K.KeyC 
H‚KeyÂ 
H.NNI 

H.Pinl 
H. Bint 
H. Int: 
H. On&a 
H‚Dsk0 
K. Sets 
H‚ Nase 
H.Kill 
H. Ipì 

hi. Copy 
H. Cad 

H‚DskF 
H.DskI 
H. âttr 
H.Lset 
K.Rset 
H.Fiel 
H.Mis 
H.Mis 
H.Bkd$ 
H. Evi 

HK. Cvs 

H. Cyd 

HK. GetP 


Functie 


Interrupt, voornaseltjk tiaer-gestuurd 
Standaard CHPUT 

Plaats cursor 

Verwijder cursor 

Standaard DSPFNK 
Standaard ERAFNK 

Standaard TOTEXT 

Standaard CH6ET 

Kopieer karakterset naar VÒP 
Kaybaard decoder 

Keyboard decoder (sneì) 
Standaard NAI 

Standaard PINLIN 
Standaard QINLIN 
Standaard INLIN 

ON device GOTO procedure 
Disk Output (DSKO$) 

SET 

RENAME 

KiLL 

Initial Prograa Load (IPL) 
COPY 

CMD 

Disk Free (DSKF) 

Disk Input (DSKI$) 

ATIRS 

Left Set (LSET) 

Right Set (RSET) 

FIELD 

Make Int (MK1$) 

Make Single (MKi$} 

Make Double (NKD$) 

Convert Int (CVI) 

Convert Single (CVS) 
Convert Double (CVD) 
Standaard GEÏPIR (gek file pointer) 
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$FE5S 
$FE5G 
$FE5D 
$FE52 
$FE67 
$FELC 
$FE7| 
$FE7b 
$FE7B 
$FEBO 
$FEB5 
$FEBA 
$FE9F 
$FE?4 
$FES 
$FEGE 
$FER3 
$FEAB 
$FEAD 
$FED2 
$FEB7 
$FEBC 
$FECI 
$FEC6 
$FECH 
$FEDO 
$FED5 
$FEDA 
$FEDF 
$FFE4 
SFFES 
$FEEE 
$FEF3 
$FEFS 
S$FEFD 
$FFO2 
$FFO7 
$FFOC 
SFFLL 
SFF 16 
$FFIB 
$FF20 
$Fr25 
SFF2A 
SFF2F 
$FEI4 
$FFJ9 
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K.Setf 
H. NoFo 
H. Nulo 
H.NtFI 
KH. Merg 
KH. Save 
H‚ Bins 
KH. BinL 
H.File 
HK. DGet 
H.Fil0 
K. InDs 
H.RsLF 
H. SavD 
H. Lac 

H.Lof 

H.Eof 

H.FPos 
H. Bak 
H.ParD 
H. NoDe 
H.PosD 
H. DevN 
H. Bend 
H. RunC 
H.Clea 
H.LopD 
H.StkKE 
H. IsFì 
HK. CutD 
H.CrDa 
H. DskC 
H.Dobr 
H.PrgE 
H.ErrP 
H.Errf 
HK. Read 
HK. Main 
H.DirD 
H.Finl 
H.FinE 
H.Crun 
H. Crus 
H. IsRe 
H.NtFa 
H. Sn6f 
H. Neus 


Standaard SETFIL (set file pointer) 
Standaard NOFOR (no for clause) t.b.v. OPEN 
Standaard NULOPN (null open file) t.b.v, OPEN 
Standaard NTFLO (not file number 0) t‚b.v. CLOSE IO-butfer Ô 
MERGE 

BAVE 

SAVE (binair) 

LOAD (binair) 

FILES 

DEET 

Standaard FILOUL (seg. uitvoer) 
Standaard INDSKC (seq, invoer) 
Herselectie oude drive (INPUT$) 

Save huidige drive 

LOC (lokatie-functie) 

LOF (lengte van file-functie) 

EDF (einde file-functie) 

FPOS (file positie-functie) 

Standaard BAKUPT (back up-routine) 
Standaard PARDEV (pass device name) 
Standaard NODEVN (no device naae) 
Standaard POSDSK (possible disk) 
Standaard DEVNAM (device nane) 

Standaard GENDSP (general dispatcher) 
Standaard RUNC (run-clear) 

CLEAR 

Standaard LOPDFT (loop and set default) 
Standaard STKERR (180-stack error } 
Standaard ISFLIO (file [0) 

Standaard DUTDO 

Standaard CRLF (CR+linefeed naar OUTDO) 
Standaard DSKCHI (disk character input) 
Standaard DOGRPH 

Standaard PRGEND (einde van prograama) 
Standaard ERRPRT (error uitvoer) 

Errar verwerking 

‘Àlles OK'-gedeelte van de ‘MAIN loop’ 
Standaard MAIN (haofdlus) 

Standaard DIRDO (direct statement) 

Einde hoofdlus-invoer 

Einde hoofdlus-error (onjuist regelnunner} 
(De)coderen BASIC-regels 

(Deicaderen BASIC-regels 

(Beicaderen BASIC-regeìs 

(Delcaderen BASIC-regels 

FOR 

Nieuw statezent verwerken (zelfde regel} 


$FFIE 
BEA 
$FF48 
$FFAD 
sFrS2 
$r5] 
SFFSC 
$FFb1 
$Fr56 
$FF6B 
$FF70 
$FF75 
$FF7A 
Ld 
$FFDA 
$FFBE 
$FrR3 
$FF3B 
$FF9D 
$FFA2 
$FFA7 
$FFAC 
$FFEL 
$FFB 
$FFBB 
$FFCO 
$FFCS 


H. Sane 
H. Chr 
ú.Retu 
K.PrtF 
H. Coap 
H.FinP 
H. Trän 
H. Frie 
K.NtaL 
H.Eval 
KH. OkNo 
H‚Fin6 
H, sai 
KH. widt 
H.List 
KH. BufL 
H.Frgl 
H.ScnE 
H.Fret 
H.Ptrg 
H.PhyD 
H. Fora 
H.Erra 
K.Lpta 
H.Lpts 
H.Scre 
K.Piay 


Signalering uitvoerpunt in statesent-verwerking 
Standaard CHGET 

RETURN 

PRINT 

PRINT (zoeken naar exclusieve tekens) 

PRINT teinde) 

Invoer -error 

Expressie-evaluatie 

Expressie-evaluatie 

Factor -evaluatie 

Factor-evaluatie 

Factor-evaluatie 

Signalering uitvoerpunt in statenent-verwerking 
WIDTH 

LIST 

Standaard BUFLIN (buffer line) voor (debcoderen RASIC-regels 
Standaard FRQINT (integer-oarekening) 

Oazetting van regelnuaaer naar adres 

Standaard FRETK (free up to tenporaries) 
Standaard PTRGET (pointer get voor variabelen) 
Standaard PHYDIO (physical disk 10 

Standaard FORMAT 

ERROR-behandel ing... 

Standaard LPTOUT 

Standaard LPTSTT 

SCREEN 

PLAY 
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Index 


A-register 20 

absolute adressering 24 
accumulator 20 
adressering, geïndexeerde 25 
adressering, impliciete 24 
adressering, onmiddellijke 24 
adressering, zero page 25 
adressering, indirecte 26 
adressering, relatieve 25 
adressering, absolute 24 
adressering, bit- 27 
algemene registers 20 
assembler 15 

BASIC 14 

binaire getallen 56 

BIOS 61 

bit 56 

bitadressering 27 

byte 56 

carry 21 

EPROM 13 

flag-register 21 
geïndexeerde adressering 25 
half carry flag 21 
hexadecimale getallen 56 
impliciete adressering 24 
indexregisters 20 
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indirecte adressering 26 
interrupt, maskeerbare 48 
interrupt 35, 37 
interrupt-register 22 
maskeerbare interrupt 48 
monitor 15 

nybble 59 
onmiddellijke adressering 24 
overflow flag 21 

parity flag 21 
programmateller 18 
RAM 13 
refresh-register 22 
relatieve adressering 25 
ROM 13 
scherm-modes 115 
signflag 22 

sprite 115, 159 

stack pointer 19 
stapelwijzer 18 
subtract flag 21 
VDP-processor 116 
verborgen registerset 22 
word 46 

Z80, opbouw vande 17 
zero page-adressering 25 
zeroflag 21 
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Bestelkaart diskette/cassette 


Ondergetekende: 

Naam: 

Adres: 

Postcode en woonplaats: 


bestelt hierbij*) de: 
O diskette ad. f 24,50 
DO cassette ad. f 19,50 


behorende bij: Machinetaal voor MSX-computers 


U kunt deze diskette of cassette in uw bezit krijgen door een ingevulde en 
ondertekende girobetaalkaart of bankcheque te zamen met deze bestelkaart te zenden 
aan: 


Kluwer Technische Boeken B.V. 

t.a.v. afd. administratie 

Brink 25 

7411 BS Deventer 

Desgewenst kunt u het verschuldigde bedrag ook overmaken op gironummer 
3243819 t.n.v. Kluwer Technische boeken in Deventer onder vermelding van 
bestelnummer 2035 CAS voor de cassette, of: 

bestelnummer 2035 DIS voor de diskette 


*) aankruisen wat u wenst. 


Bezitters van MSX-computers weten dat hun machine over grandioze 
mogelijkheden beschikt. Helaas is BASIC, de ingebouwde 
programmeertaal van deze computers, vaak te langzaam om alles uit de 
computer te kunnen halen. 

Enthousiaste MSX-bezitters zijn dan ook geneigd om te experimenteren 
met machinetaal, een taal die veel dichter bij de computer staat dan 
BASIC. Het is echter zeer moeilijk om zonder deskundige begeleiding in 
machinetaal thuis te raken. 


Dit boek zorgt voor die deskundige begeleiding. Het is geschreven voor de 
MSX-bezitter die zich wil verdiepen in de geheimen van machinetaal. 
Enige BASIC-voorkennis is vereist. 

Met dit boek komt u al zeer snel tot spectaculaire resultaten. Dankzij de 
gratis machinetaalmonitor, als programma-listing opgenomen, kunt u 
meteen met de vele voorbeelden experimenteren. Tegelijkertijd leert u 
spelenderwijs omgaan met de vele machinetaalinstructies die de 
MSX-computer kent. De vele overzichtelijke tabellen en tekeningen zult u 
steeds weer willen raadplegen. 


John Vanderaart geniet grote bekendheid als programmeur en als auteur 


van vele artikelen. In dit boek bewijst hij op een prettig leesbare manier dat 
iedereen in machinetaal kan leren programmeren. 


ISBN 90 201 1999 0 


